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;
本文共 255 字，大约阅读时间需要 1 分钟。
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;
转载于:https://my.oschina.net/hermer/blog/319546