資源描述:
《Delphi字符串函數(shù)大全.doc》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。
1、Delphi字符串函數(shù)大全◇[DELPHI]字符串的過程和函數(shù)Insert(obj,target,pos);//字符串target插入在pos的位置。如插入結(jié)果大于target最大長度,多出字符將被截掉。如Pos在255以外,會(huì)產(chǎn)生運(yùn)行錯(cuò)。例如,st:='Brian',則Insert('OK',st,2)會(huì)使st變?yōu)?BrOKian'。Delete(st,pos,Num);//從st串中的pos(整型)位置開始刪去個(gè)數(shù)為Num(整型)個(gè)字符的子字串。例如,st:='Brian',則Delete(st,3,2)將變?yōu)锽rn。Str(value,st);//將數(shù)值value(整型或?qū)嵭停┺D(zhuǎn)換
2、成字符串放在st中。例如,a=2.5E4時(shí),則str(a:10,st)將使st的值為'25000'。Val(st,var,code);//把字符串表達(dá)式st轉(zhuǎn)換為對應(yīng)整型或?qū)嵭蛿?shù)值,存放在var中。St必須是一個(gè)表示數(shù)值的字符串,并符合數(shù)值常數(shù)的規(guī)則。在轉(zhuǎn)換過程中,如果沒有檢測出錯(cuò)誤,變量code置為0,否則置為第一個(gè)出錯(cuò)字符的位置。例如,st:=25.4E3,x是一個(gè)實(shí)型變量,則val(st,x,code)將使X值為25400,code值為0。Copy(st.pos.num);//返回st串中一個(gè)位置pos(整型)處開始的,含有num(整型)個(gè)字符的子串。如果pos大于st字符串的長度
3、,那就會(huì)返回一個(gè)空串,如果pos在255以外,會(huì)引起運(yùn)行錯(cuò)誤。例如,st:='Brian',則Copy(st,2,2)返回'ri'。Concat(st1,st2,st3……,stn);//把所有自變量表示出的字符串按所給出的順序連接起來,并返回連接后的值。如果結(jié)果的長度255,將產(chǎn)生運(yùn)行錯(cuò)誤。例如,st1:='Brian',st2:='',st3:='Wilfred',則Concat(st1,st2,st3)返回'BrianWilfred'。Length(st);//返回字符串表達(dá)式st的長度。例如,st:='Brian',則Length(st)返回值為5。Pos(obj,target)
4、;//返回字符串obj在目標(biāo)字符串target的第一次出現(xiàn)的位置,如果target沒有匹配的串,Pos函數(shù)的返回值為0。例如,target:='BrianWilfred',則Pos('Wil',target)的返回值是7,Pos('hurbet',target)的返回值是0。usesStrUtils首部functionAnsiResemblesText(constAText,AOther:string):Boolean;$[StrUtils.pas功能返回兩個(gè)字符串是否相似說明ANSI(AmericanNationalStandardsInstitute)美國國家標(biāo)準(zhǔn)協(xié)會(huì);不區(qū)分大小寫參
5、考functionStrUtils.SoundexProc;varStrUtils.AnsiResemblesProc例子CheckBox1.Checked:=AnsiResemblesText(Edit1.Text,Edit2.Text);━━━━━━━━━━━━━━━━━━━━━首部functionAnsiContainsText(constAText,ASubText:string):Boolean;$[StrUtils.pas功能返回字符串AText是否包含子串ASubText說明不區(qū)分大小寫參考functionStrUtils.AnsiUppercase;functionStr
6、Utils.AnsiPos例子CheckBox1.Checked:=AnsiContainsText(Edit1.Text,Edit2.Text);━━━━━━━━━━━━━━━━━━━━━首部functionAnsiStartsText(constASubText,AText:string):Boolean;$[StrUtils.pas功能返回字符串AText是否以子串ASubText開頭說明不區(qū)分大小寫參考functionWindows.CompareString例子CheckBox1.Checked:=AnsiStartsText(Edit1.Text,Edit2.Text);━━
7、━━━━━━━━━━━━━━━━━━━首部functionAnsiEndsText(constASubText,AText:string):Boolean;$[StrUtils.pas功能返回字符串AText是否以子串ASubText結(jié)尾說明不區(qū)分大小寫參考functionWindows.CompareString例子CheckBox1.Checked:=AnsiEndsText(Edit1.Text,Edit2.Text);━━━