三省吾身，每天都是新的

     【字符串函数大全】       首部 function AnsiResemblesText(const AText, AOther: string): Boolean;       $[StrUtils.pas      功能 返回两个字符串是否相似      说明 ANSI(American National Standards Institute)美国国家标准协会;不区分大小写   

unit UnDM;interfaceuses  SysUtils, Classes, DB, ADODB;type  TDM_Tax = class(TDataModule)    ADOCon_Tax: TADOConnection;    ADOQry_Tax: TADOQuery;    procedure DataModuleCreate(Sender: TObject);