Delphi6函数大全(1) <> 首部 function AnsiResemblesText(const AText, AOther: string): Boolean; $[StrUtils.pas功能 返回两个字符串是否相似说明 ANSI(American National Standards Institute)美国国家标准协会;不 区分大小写参考 function StrUtils.SoundexProc; var StrUtils.AnsiResemblesProc例子
FillChar过程 SysUtils procedure FillChar(var X; Count: Integer; Value: Byte); FillChar在变量X指向的地址空间连续填充Count个字节,填充值由Value参数给定,Value的类型可以是Byte或Char类型。 var S: Array[0..79] of Char; begin {set of all spaces} FileChar(S, SizeOf(S), ’’);