判断字符串是否一样

判断字符串是否一样
 
.TXT  .txt  .TxT  为一样的
SameText
 CompareStr

function SameText(const S1, S2: string): Boolean;
   if SameText('.txt','.tXT') then
     ShowMessage('Same');




posted @ 2014-07-29 17:11  XE2011  阅读(288)  评论(0)  编辑  收藏  举报