资源描述:
《Delphi6函数大全》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、Delphi6函数大全(1)作者:未知 文章来源:未知 点击数:5712 更新时间:2005-6-2416:42:19 Delphi6函数大全1-StrUtils.pas 首部functionAnsiResemblesText(constAText,AOther:string):Boolean;$[StrUtils.pas 功能返回两个字符串是否相似 说明ANSI(AmericanNationalStandardsInstitute)美国国家标准协会;不区分大小写 参考fu
2、nctionStrUtils.SoundexProc;varStrUtils.AnsiResemblesProc 例子CheckBox1.Checked:=AnsiResemblesText(Edit1.Text,Edit2.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部functionAnsiContainsText(constAText,ASubText:string):Boolean;$[StrUtils.pas 功能返回字符串AText是否包含子串ASubText 说
3、明不区分大小写 参考functionStrUtils.AnsiUppercase;functionStrUtils.AnsiPos 例子CheckBox1.Checked:=AnsiContainsText(Edit1.Text,Edit2.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部functionAnsiStartsText(constASubText,AText:string):Boolean;$[StrUtils.pas 功能返回字符串AText是否以子串ASubT
4、ext开头 说明不区分大小写 参考functionWindows.CompareString 例子CheckBox1.Checked:=AnsiStartsText(Edit1.Text,Edit2.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部functionAnsiEndsText(constASubText,AText:string):Boolean;$[StrUtils.pas 功能返回字符串AText是否以子串ASubText结尾 说明不区分大小写 参考fun
5、ctionWindows.CompareString 例子CheckBox1.Checked:=AnsiEndsText(Edit1.Text,Edit2.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部functionAnsiReplaceText(constAText,AFromText,AToText:string):string;$[StrUtils.pas 功能返回字符串AText中用子串AFromText替换成子串AToText的结果 说明不区分大小写 参考fun
6、ctionSysUtils.StringReplace;typeSysUtils.TReplaceFlags 例子Edit4.Text:=AnsiReplaceText(Edit1.Text,Edit2.Text,Edit3.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部functionAnsiMatchText(constAText:string;constAValues:arrayofstring):Boolean;$[StrUtils.pas 功能62/62返回字符串数组
7、AValues中是否包含字符串AText 说明不区分大小写 参考functionStrUtils.AnsiIndexText 例子CheckBox1.Checked:=AnsiMatchText(Edit1.Text,['a1','a2','a3','a4']); ━━━━━━━━━━━━━━━━━━━━━ 首部functionAnsiIndexText(constAText:string;constAValues:arrayofstring):Integer;$[StrUtils.pas
8、 功能返回字符串AText在字符串数组AValues中的位置 说明不区分大小写;如果不包含则返回-1 参考functionSysUtils.AnsiSameText 例子SpinEdit1.Value:=AnsiIndexText(Edit1.Text,['a1','a2','a3','a4']); ━━━━━━━━━━━━━━━━━━━━━ 首部functionAnsiContainsStr(constAText,ASubText:strin