本文整理自网络,侵删。
var s: string;begin s:='AA'; if CompareStr('bbaabb',s)>0 then //CompareStr 这个函数可以模糊匹配,且不区分大小写 ShowMessage('aa');end;
相关阅读 >>
Delphi {$pointermath on} 方便指针操作的编译指令
Delphi windows 编程[17] - 更换菜单: loadmenu、destroymenu、setmenu
更多相关阅读请进入《Delphi》频道 >>