Delphi SameText

本文整理自网络，侵删。

 SameText


var
s1,s2: string;
b1,b2: Boolean;
begin
s1 := 'C:\Temp';
s2 := 'c:\temp';

b1 := SameText(s1, s2); //True
b2 := s1 = s2; //False

ShowMessage(BoolToStr(b1,True) + ' - ' + BoolToStr(b2,True));
end;

 

相关阅读 >>

Delphi tzipfile 用法

Delphi 有关pchar.strcopy的实验

Delphi readprocessmemory用法

Delphi try except与try finally不同之处

Delphi 传输文件例子的核心代码

Delphi api读写ini文件

Delphi ansicontainstext 是否包含子串

Delphi xe5 android 使用system.zip单元释放资源文件

Delphi 2009 泛型容器单元(generics.collections)[3]: tstack<t>

Delphi xe5的新功能“ tlistview内置搜索过滤”

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

转载请注明出处：木庄网络博客 » Delphi SameText