查找字符串个数问题

wwwyyyxxx 2005-04-20 02:32:51
Edit1
Button1
OpenDialog1

在Edit1中输入一字符串例如“Test”,然后按Button1弹出OpenDialog1,选择好文件后MessageBox提示该字符串共出现过几次。
另外如何在MessageBox中显示文件名的时候,去掉路径?
...全文
121 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
wwwyyyxxx 2005-04-20
  • 打赏
  • 举报
回复
问题都解决了,看来求人不如求己呀,感谢楼上的兄弟。
wwwyyyxxx 2005-04-20
  • 打赏
  • 举报
回复
问题已经解决,来了个新问题,copy函数对大小写敏感,如何禁止?
wwwyyyxxx 2005-04-20
  • 打赏
  • 举报
回复
首先是输入要查找的内容,然后点击查找按钮,弹出文件选择对话框,选择好要查询的文件,利用MessageBox返回查询后的结果,就这么简单~
麻烦能给出代码最好,本人对很多函数的用法很不熟悉,谢谢~
何鲁青 2005-04-20
  • 打赏
  • 举报
回复
选择好文件后MessageBox提示该字符串共出现过几次。
--------------
??是在那里查找test出现了几次拿?文件路径中,还是文件内容中???
另外如何在MessageBox中显示文件名的时候,去掉路径?
--------------
用pos和rightStr函数来截断字符串就可以了

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧