易截截图软件、单文件、免安装、纯绿色、仅160KB

关于delphi字符串的问题!

从数据里读出一些数据放到一个listview里 然后用户要搜索‘跑车’ 我就要把只要有跑车字眼的数据都取出来比如’法拉利跑车‘ 请问 这个字符串怎么比较呀?  不能在数据库里写存储过程来取,只能在当前的listview里取,数据库不归我们管
小弟新手 高手见笑 O(∩_∩)O~
uses
  StrUtils;
var
  S, SubStr: string;
  I: integer;
begin
  S := '法拉利跑车';
  SubStr := '跑车';
  I := PosEx(SubStr, S, 0);  //从第N位开始查找,或者用Pos(SubStr, S)
  if I >= 0 then  //找到匹配的字符串
  begin
    //...
  end;
end;

楼上的回答很不错!我来晚了!哈哈!

回帖就有分!!

回帖就有分!!


相关问答:

ACCESS的自定义函数在delphi里怎么用呢...

我在模块里自定义了一个函数:stradd()

可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...

这个问题有什么办法可以解决的吗? 非常感激!


(在A ......

转帖:DELPHI编写服务程序总结一--编写技巧

原文地址:http://hi.baidu.com/sqldebug/blog/item/8e2749213082c0589922ed61.html

直接贴过来的,有点乱,大家凑合看。

一、服务程序和桌面程序的区别

Windows 2000/XP/2003等支持一种叫做“ ......

delphi 除法 "/" 与 div 的不同

[size=18px]var s,n:integer;
begin
write('输入变长的条数n');       
readln(n);
[color=#FF0000]s:=n*(n-1)*(n-2)div 6;    //本行替换为s:=n*(n-1)*(n-2)/ ......

is not a valid integer value delphi问题

我尝试一个 idhttp 访问网站链接的程序
在设置代理端口的时候出错
编译没有错误
就是在运行的时候 出现了
80 is not a valid integer value 的问题
我已经把 函数分类出来的 port 转换为 integer 了 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号