Delphi 函数参考[6]

      功能 反回比较两个字符串
      说明 当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);
      ━━━━━━━━━━━━━━━━━━━━━
      首部 function ansisametext(const s1, s2: string): boolean; $[sysutils.pas
      功能 返回两个字符串是否相等
      说明 不区分大小写
      参考 function sysutils.ansicomparetext
      例子 checkbox1.checked := ansisametext(edit1.text, edit2.text);
      ━━━━━━━━━━━━━━━━━━━━━
      首部 function ansistrcomp(s1, s2: pchar): integer; $[sysutils.pas
      功能 返回比较两个指针字符串
      说明 当s1>s2返回值>0;当s1<s2返回值<0;当s1=s2返回值=0;区分大小写
      参考 function system.comparestring
      例子 spinedit1.value := ansistrcomp(pchar(edit1.text), pchar(edit2.text))
      ━━━━━━━━━━━━━━━━━━━━━
      首部 function ansistricomp(s1, s2: pchar): integer; $[sysutils.pas
      功能 返回比较两个指针字符串
      说明 当s1>s2返回值>0;当s1<s2返回值<0;当s1=s2返回值=0;不区分大小写;ignore(忽略)
      参考 function windows.comparestring
      例子 spinedit1.value := ansistricomp(pchar(edit1.text), pchar(edit2.text))
      ━━━━━━━━━━━━━━━━━━━━━
      首部 function ansistrlcomp(s1, s2: pchar; maxlen: cardinal): integer;
      $[sysutils.pas
      功能 返回比较两个指针字符串指定长度
      说明 当s1>s2返回值>0;当s1<s2返回值<0;当s1=s2返回值=0;区分大小写;length(长度)
      参考 function windows.comparestring
      例子 spinedit1.value := ansistrlcomp(pchar(edit1.text), pchar(edit2.text),
      spinedit2.value)
      ━━━━━━━━━━━━━━━━━━━━━
      首部 function ansistrlicomp(s1, s2: pchar; maxlen: cardinal): integer;
      $[sysutils.pas
      功能 返回比较两个指针字符串指定长度
      说明 当s1>s2返回值>0;当s1<s2返回值<0;当s1=s2返回值=0;不区分大小写
      参考 function windows.comparestring
      例子 spinedit1.value := ansistrlicomp(pchar(edit1.text), pchar(edit2.text),
      spinedit2.value)
      ━━━━━━━━━━━━━━━━━━━━━
      首部 function ansistrlower(str: pchar): pchar; $[sysutils.pas
      功能 返回指针字符串小写形式
      说明 非大写字符不处理
      参考 function windows.charlower
      例子 edit2.text := ansistrlower(pchar(edit1.text));
      ━━━━━━━━━━━━━━━━━━━━━
      首部 function ansistrupper(str: pchar): pchar; $[sysutils.pas
      功能 返回指针字符串大写形式
      说明 非小写字符不处理
      参考 function windows.charupper
      例子 edit2.text := ansistrupper(pchar(edit1.text));
      ━━━━━━━━━━━━━━━━━━━━━
      首部 function ansilastchar(const s: string): pchar; $[sysutils.pas
      功能 返回字符串s的最后一个指针字符
      说明 当字符串s为空串则返回空指针
      参考 function sysutils.bytetype
      例子 edit2.text := ansilastchar(edit1.text);
      ━━━━━━━━━━━━━━━━━━━━━