字符串函数大全(13) 说明 ANSI(American National Standards Institute)美国国家标准协会;非小写的字符不变 参考 function Windows.CharUpperBuff 例子 Edit2.Text := AnsiUpperCase(Edit1.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部 function AnsiLowerCase(const S: string): string; $[SysUtils.pas 功能 返回字符串S的小写形式 说明 非大写字符不处理 参考 function Windows.CharLowerBuff 例子 Edit2.Text := AnsiLowerCase(Edit1.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部 function AnsiCompareStr(const S1, S2: string): Integer; $[SysUtils.pas 功能 反回比较两个字符串 说明 当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;区分大小写 参考 function Windows.CompareString 例子 SpinEdit1.Value := AnsiCompareStr(Edit1.Text, Edit2.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部 function AnsiSameStr(const S1, S2: string): Boolean; $[SysUtils.pas 功能 返回两个字符串是否相等 说明 区分大小写 参考 function SysUtils.AnsiCompareStr 例子 CheckBox1.Checked := AnsiSameStr(Edit1.Text, Edit2.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部 function AnsiCompareText(const S1, S2: string): Integer; $[SysUtils.pas 功能 反回比较两个字符串 说明 当S1>S2返回值>0;当S1<S2返回值<0;当S1=S2返回值=0;不区分大小写 参考 function Windows.CompareString 例子 SpinEdit1.Value := AnsiCompareText(Edit1.Text, Edit2.Text); ━━━━━━━━━━━━━━━━━━━━━