delphi SysUtils.CompareStr、SysUtils.CompareText - 字符串比较


本文整理自网络,侵删。

 SysUtils.CompareStr、SysUtils.CompareText - 字符串比较
CompareStr 区分大小写; CompareText 不区分大小写. 举例:
--------------------------------------------------------------------------------

var
s1,s2: string;
i: Integer;
begin
s1 := 'abc';
s2 := 'adc';
i := CompareStr(s1,s2);
ShowMessage(IntToStr(i)); {-2}

i := CompareText(s1,s2);
ShowMessage(IntToStr(i)); {-2}

s1 := 'abc';
s2 := 'ABC';
i := CompareStr(s1,s2); {CompareStr 区分大小写}
ShowMessage(IntToStr(i)); {32}

i := CompareText(s1,s2); {CompareText 不区分大小写}
ShowMessage(IntToStr(i)); {0}
end;

相关阅读 >>

Delphi xe 可用的md5算法

Delphi tms web core tedit编辑输入框属性展示

Delphi2007-Delphi2010 程序不出现在任务栏的方法

Delphi (vcl及fmx[firemonkey])启动时的欢迎窗口实现代码

Delphi 下载并显示网上的图片

Delphi xp下的进程静音技术

Delphi tfilestream 流操作2

Delphi tstreamreader tfile assignfile读取文本文件

dll 的静态调用实例代码

Delphi 写变速齿轮外挂

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...