如题...
解决方案 »
- IdHTTP抓文件遇到CC防火墙.抓取的页面不对如何解决...
- 线程的EXECUTE还没结束就执行了类的DESTROY方法,这是怎么回事?
- 跪求:在windows下delphi 的应用程序放在apache的哪个目录下?
- socketconnection連接不到現在的應用服務器﹐servername內總是以前的應用服務器
- 急!!!关于键盘HOOK的问题!!
- 有句SQL语句大家帮忙改改!高分相送(急)
- Delphi5+SQLServer2000执行SQL语句报“超时已过期”的错误?
- delphi中如何将real型的数据转化成integer
- ADO如何实现近似查询
- 调查一下:现在程序员都是用什么数据库?
- fastreport 如何只打印过滤后的dataset
- activeform怎么打开新窗口
t:=tstringlist.creat;
t.loadfromfile('你的文本文件');
s:=stringreplace(t.txt,' ',,[rfReplaceAll]);
c=length(t.txt)-length(s); //空格的个数,为0即无空格
。。
当然你可用tregexpr(正则)来做,要比逐行统计程序上方便些(效率不管了)
s:=stringreplace(t.txt,' ','',[rfReplaceAll]); //去掉所有空格
所以你的不可用