Delphi6函数大全(1) <> 首部 function AnsiResemblesText(const AText, AOther: string): Boolean; $[StrUtils.pas功能 返回两个字符串是否相似说明 ANSI(American National Standards Institute)美国国家标准协会;不 区分大小写参考 function StrUtils.SoundexProc; var StrUtils.AnsiResemblesProc例子
Delphi函数大全 首部 function Languages: TLanguages; $[SysUtils.pas 功能 返回系统语言对象 说明 通过此函数可以得到系统的语言环境 参考 type SysUtils.TLanguages 例子 ///////Begin Languages procedure TForm1.Button1Click(Sender: TObject); var I: Integer; begin Memo1.Clear; for I := 0 to Langu