delphi常用函數(shù)大全

1、.：.； delphi常用函數(shù)大全轉(zhuǎn)Abort函數(shù)引起放棄的不測處置Abs函數(shù)絕對值函數(shù)AddExitProc函數(shù)將一過程添加到運(yùn)轉(zhuǎn)時庫的終了過程表中Addr函數(shù)前往指定對象的地址AdjustLineBreaks函數(shù)將給定字符串的行分隔符調(diào)整為CR/LF序列Align屬性使控件位于窗口某部分Alignment屬性控件標(biāo)簽的文字位置AllocMem函數(shù)在堆棧上分配給定大小的塊AllowGrayed屬性允許一個灰度選擇AnsiCompareStr函數(shù)比較字符串區(qū)分大小寫AnsiCompareText函數(shù)比較字符串不區(qū)分大小寫AnsiLowerCase函數(shù)將字符轉(zhuǎn)換為小寫AnsiUpperCase函

2、數(shù)將字符轉(zhuǎn)換為大寫Append函數(shù)以附加的方式翻開已有的文件ArcTan函數(shù)余切函數(shù)AssignFile函數(shù)給文件變量賦一外部文件名Assigned函數(shù)測試函數(shù)或過程變量能否為空AutoSize屬性自動控制標(biāo)簽的大小BackgroundColor屬性背風(fēng)光BeginThread函數(shù)以適當(dāng)?shù)姆绞浇⒂糜趦?nèi)存管理的線程BevelInner屬性控件方框的內(nèi)框方式BevelOuter屬性控件方框的外框方式BevelWidth屬性控件方框的外框?qū)挾菳lockRead函數(shù)讀一個或多個記錄到變量中BlockWrite函數(shù)從變量中寫一個或多個記錄BorderStyle屬性邊境類型BorderWidth屬性邊境

3、寬度Break命令終止for、while、repeat循環(huán)語句Brush屬性畫刷Caption屬性標(biāo)簽文字的內(nèi)容ChangeFileExt函數(shù)改動文件的后綴ChDir函數(shù)改動當(dāng)前目錄Checked屬性確定復(fù)選框選中形狀Chr函數(shù)前往指定序數(shù)的字符CloseFile命令封鎖翻開的文件Color屬性標(biāo)簽的顏色Columns屬性顯示的列數(shù)CompareStr函數(shù)比較字符串區(qū)分大小寫Concat函數(shù)合并字符串Continue命令繼續(xù)for、while、repeat的下一個循環(huán)Copy函數(shù)前往一字符串的子串Cos函數(shù)余弦函數(shù)Ctl3D屬性能否具有3D效果Cursor屬性鼠標(biāo)指針移入后的外形Date函數(shù)前

4、往當(dāng)前的日期DateTimeToFileDate函數(shù)將DELPHI的日期格式轉(zhuǎn)換為DOS的日期格式DateTimeToStr函數(shù)將日期時間格式轉(zhuǎn)換為字符串DateTimeToString函數(shù)將日期時間格式轉(zhuǎn)換為字符串DateToStr函數(shù)將日期格式轉(zhuǎn)換為字符串DayOfWeek函數(shù)前往星期的數(shù)值Dec函數(shù)遞減變量值DecodeDate函數(shù)將日期格式分解為年月日DecodeTime函數(shù)將時間格式分解為時、分、秒、毫秒Delete函數(shù)從字符串中刪除子串DeleteFile命令刪除文件DiskFree函數(shù)前往剩余磁盤空間的大小DiskSize函數(shù)前往指定磁盤的容量Dispose函數(shù)釋放動態(tài)變量所占的

5、空間DisposeStr函數(shù)釋放字符串在堆棧中的內(nèi)存空間DitherBackground屬性使背風(fēng)光的顏色加重或減少50%DragCursor屬性當(dāng)鼠標(biāo)按下光陰標(biāo)的外形DragMode屬性按動的作用方式DropDownCount屬性允許的顯示數(shù)據(jù)項的數(shù)目EditMask屬性編輯方式Enabled屬性能否使標(biāo)簽呈現(xiàn)翻開形狀EncodeDate函數(shù)將年月日合成為日期格式EncodeTime函數(shù)將時、分、秒、毫秒合成為時間格式EndMargin屬性末尾邊緣Eof函數(shù)對有類型或無類型文件測試能否到文件尾Eoln函數(shù)前往文本文件的行終了形狀Erase命令刪除外部文件ExceptAddr函數(shù)前往引起當(dāng)前不

6、測的地址Exclude函數(shù)從集合中刪除一些元素ExceptObject函數(shù)前往當(dāng)前不測的索引Exit命令立刻從當(dāng)前的語句塊中退出Exp函數(shù)指數(shù)函數(shù)ExpandFileName函數(shù)前往包含絕對途徑的字符串ExtendedSelect屬性能否允許存在選擇方式，True時，MultiSelect才有意義ExtractFileDir函數(shù)前往驅(qū)動器和途徑ExtractFileExt函數(shù)前往文件的后綴ExtractFileName函數(shù)前往文件名ExtractFilePath函數(shù)前往指定文件的途徑FileAge函數(shù)前往文件已存在的時間FileClose命令封鎖指定的文件FileCreate命令用指定的文件名

7、建立新文件FileDateToDateTime函數(shù)將DOS的日期格式轉(zhuǎn)換為DELPHI的日期格式FileExists函數(shù)檢查文件能否存在FileGatAttr函數(shù)前往文件的屬性FileGetDate函數(shù)前往文件的DOS日期時間標(biāo)志FileOpen命令用指定的存取方式翻開指定的文件FilePos函數(shù)前往文件的當(dāng)前指針位置FileRead命令從指定的文件讀取FileSearch命令在目錄中搜索指定的文件FileSeek函數(shù)改動文件的指針FileSetAttr函數(shù)設(shè)置文件屬性FileSetDate函數(shù)設(shè)置文件的DOS日期時間標(biāo)志FileSize函數(shù)前往當(dāng)前文件的大小FileWrite函數(shù)對指定的文件

8、做寫操作FillChar函數(shù)用指定的值填充延續(xù)字節(jié)的數(shù)FindClose命令終止FindFirst/FindNext序列FindFirst命令對指定的文件名及屬性搜索目錄FindNext命令前往與文件名及屬性匹配的下一入口FloatToDecimal函數(shù)將浮點(diǎn)數(shù)轉(zhuǎn)換為十進(jìn)制數(shù)FloatToStrF函數(shù)將浮點(diǎn)數(shù)轉(zhuǎn)換為字符串FloatToStr函數(shù)將浮點(diǎn)數(shù)轉(zhuǎn)換為字符串FloatToText函數(shù)將給定的浮點(diǎn)數(shù)轉(zhuǎn)換為十進(jìn)制數(shù)FloatToTextFmt函數(shù)將給定的浮點(diǎn)數(shù)轉(zhuǎn)換為十進(jìn)制數(shù)Flush函數(shù)將緩沖區(qū)的內(nèi)容刷新到輸出的文本文件中FmtLoadStr函數(shù)從程序的資源字符串表中裝載字符串FmtStr函

9、數(shù)格式化一系列的參數(shù)，其結(jié)果以參數(shù)Result前往Font屬性設(shè)置字體Format函數(shù)格式化一系列的參數(shù)并前往Pascal字符串FormatBuf函數(shù)格式化一系列的參數(shù)FormatDateTime函數(shù)用指定的格式來格式化日期和時間FormatFloat函數(shù)指定浮點(diǎn)數(shù)格式Frac函數(shù)前往參數(shù)的小數(shù)部分FreeMem函數(shù)按給定大小釋放動態(tài)變量所占的空間GetDir前往指定驅(qū)動器的當(dāng)前目錄GetHeapStatus前往內(nèi)存管理器的當(dāng)前形狀GetMem建立一指定大小的動態(tài)變量，并將指針指向該處GetMemoryManager前往內(nèi)存管理器的入口點(diǎn)Glyph函數(shù)按鈕上的圖象Halt停頓程序的執(zhí)行并前往到

10、操作系統(tǒng)Hi前往參數(shù)的高地址位High前往參數(shù)的上限值Hint屬性提示信息Int前往參數(shù)的整數(shù)部分Include添加元素到集合中Insert在字符串中插入子串IntToHex將整型數(shù)轉(zhuǎn)換為十六進(jìn)制數(shù)IntToStr將整型數(shù)轉(zhuǎn)換為字符串IOResult前往最新的I/O操作完成形狀I(lǐng)sValidIdent測試字符串能否為有效的標(biāo)識符Items屬性默許顯示的節(jié)點(diǎn)Kind屬性擺放款式LargeChange屬性最大改動值Layout屬性圖象規(guī)劃Length函數(shù)前往字符串的動態(tài)長度Lines屬性缺省顯示內(nèi)容Ln函數(shù)自然對數(shù)函數(shù)Lo函數(shù)前往參數(shù)的低地址位LoadStr函數(shù)從運(yùn)用程序的可執(zhí)行文件中裝載字符資源

11、LowerCase函數(shù)將給定的字符串變?yōu)樾慙ow函數(shù)前往參數(shù)的下限值Max屬性最大值MaxLength屬性最大長度Min屬性最小值MkDir命令建立一子目錄Move函數(shù)從源到目的復(fù)制字節(jié)MultiSelect屬性允許同時選擇幾個數(shù)據(jù)項Name屬性控件的名字New函數(shù)建立新的動態(tài)變量并設(shè)置一指針變量指向他NewStr函數(shù)在堆棧上分配新的字符串Now函數(shù)前往當(dāng)前的日期和時間Odd測試參數(shù)能否為奇數(shù)OnActivate事件焦點(diǎn)移到窗體上時觸發(fā)onClick事件單擊窗體空白區(qū)域觸發(fā)OnDblClick事件雙擊窗體空白區(qū)域觸發(fā)OnCloseQuery事件運(yùn)用者試圖封鎖窗體觸發(fā)OnClose事件窗體封鎖

12、后才觸發(fā)OnCreate事件窗體第一次創(chuàng)建時觸發(fā)OnDeactivate事件用戶切換到另一運(yùn)用程序觸發(fā)OnDragDrop事件鼠標(biāo)拖放操作終了時觸發(fā)OnDragOver事件有其他控件從他上面移過觸發(fā)onMouseDown事件按下鼠標(biāo)鍵時觸發(fā)onMouseUp事件釋放鼠標(biāo)鍵時觸發(fā)onMouseMove事件挪動鼠標(biāo)時觸發(fā)OnHide事件隱藏窗體時觸發(fā)onKeyDown事件按下鍵盤某鍵時觸發(fā)onKeyPress事件按下鍵盤上的單個字符鍵時觸發(fā)onKeyUp事件釋放鍵盤上的某鍵時觸發(fā)OnPaint事件窗體上有新部分暴顯露來觸發(fā)OnResize事件重新調(diào)整窗體大小觸發(fā)OnShow事件在窗體實踐顯示之前瞬

13、間觸發(fā)Ord前往序數(shù)類的序數(shù)OutlineStyle屬性類型OutOfMemoryError引起OutOfMemory不測PageIndex屬性頁索引Pages屬性頁P(yáng)aramCount函數(shù)前往在命令行上傳送給程序的參數(shù)數(shù)量ParamStr函數(shù)前往指定的命令行參數(shù)Pen屬性畫刷設(shè)置Pi函數(shù)前往圓周率PiPicture屬性顯示圖象PictureClosed屬性設(shè)置Closed位圖PictureLeaf屬性設(shè)置Leaf位圖PictureMinus屬性設(shè)置Minus位圖PictureOpen屬性設(shè)置Open位圖PicturePlus屬性設(shè)置Plus位圖Pos函數(shù)在字符串中搜索子串Pred函數(shù)前往先前

14、的參數(shù)Random函數(shù)前往一隨機(jī)函數(shù)Randomize函數(shù)用一隨機(jī)數(shù)初始化內(nèi)置的隨機(jī)數(shù)生成器Read函數(shù)對有格式的文件，讀一文件組件到變量中；對文本文件，讀一個或多個值到一個或多個變量中Readln函數(shù)執(zhí)行Read過程，然后跳到文件下一行ReadOnly屬性只讀屬性ReAllocMem函數(shù)分配一動態(tài)變量Rename函數(shù)重命名外部文件RenameFile函數(shù)對文件重命名Reset函數(shù)翻開已有的文件Rewrite函數(shù)建立并翻開一新的文件RmDir函數(shù)刪除空的子目錄Round函數(shù)將實數(shù)值舍入為整型值RunError函數(shù)停頓程序的執(zhí)行ScrollBars屬性滾動條形狀Seek函數(shù)將文件的當(dāng)前指針挪動到

15、指定的組件上SeekEof函數(shù)前往文件的文件終了形狀SeekEoln函數(shù)前往文件的行終了形狀SelectedColor屬性選中顏色SetMemoryManager函數(shù)設(shè)置內(nèi)存管理器的入口點(diǎn)SetTextBuf函數(shù)給文本文件指定I/O緩沖區(qū)Shape屬性顯示的外形ShowException函數(shù)顯示不測音訊與地址Sin函數(shù)正弦函數(shù)SizeOf函數(shù)前往參數(shù)所占的字節(jié)數(shù)SmallChange屬性最小改動值Sorted屬性能否允許排序Sqr函數(shù)平方函數(shù)Sqrt函數(shù)平方根函數(shù)StartMargin屬性開場邊緣State屬性控件當(dāng)前形狀Str函數(shù)將數(shù)值轉(zhuǎn)換為字符串StrAlloc函數(shù)給以NULL終了的字符串

16、分配最大長度-1的緩沖區(qū)StrBufSize函數(shù)前往存儲在由StrAlloc分配的字符緩沖區(qū)的最大字符數(shù)StrCat函數(shù)將一字符串附加到另一字符串尾并前往合并的字符串StrComp函數(shù)比較兩個字符串StrCopy函數(shù)將一個字符串復(fù)制到另一個字符串中StrDispose函數(shù)釋放堆棧上的字符串StrECopy函數(shù)將一字符串復(fù)制到另一個字符串并前往結(jié)果字符串尾部的指針StrEnd函數(shù)前往指向字符串尾部的指針Stretch屬性自動順應(yīng)控件的大小StrFmt函數(shù)格式化一系列的參數(shù)StrIComp函數(shù)比較兩個字符串不區(qū)分大小寫StringToWideChar函數(shù)將ANSI字符串轉(zhuǎn)換為UNICODE字符串S

17、trLCat函數(shù)將一字符串中的字符附加到另一字符串尾并前往合并的字符串StrLComp函數(shù)以最大長度比較兩個字符串StrLCopy函數(shù)將一個字符串中的字符復(fù)制到另一個字符串中StrLen函數(shù)前往字符串中的字符數(shù)StrLFmt函數(shù)格式化一系列的參數(shù)，其結(jié)果中包含有指向目的緩沖區(qū)的指針StrLIComp函數(shù)以最大長度比較兩個字符串不區(qū)分大小寫StrLower函數(shù)將字符串中的字符轉(zhuǎn)換為小寫StrMove函數(shù)將一個字符串中的字符復(fù)制到另一個字符串中StrNew函數(shù)在堆棧上分配一個字符串StrPas函數(shù)將以NULL終了的字符串轉(zhuǎn)換為PASCAL類的字符串StrPCopy函數(shù)將PASCAL類的字符串復(fù)制為

18、以NULL終了的字符串StrPLCopy函數(shù)從PASCAL類的最大長度字符串復(fù)制為以NULL終了的字符串StrPos函數(shù)前往一個字符串在另一個字符串中初次出現(xiàn)指針StrRScan函數(shù)前往字符串中最后出現(xiàn)字符的指針StrScan函數(shù)前往字符串中出現(xiàn)首字符的指針StrToDate函數(shù)將字符串轉(zhuǎn)換為日期格式StrToDateTime函數(shù)將字符串轉(zhuǎn)換為日期/時間格式StrToFloat函數(shù)將給定的字符串轉(zhuǎn)換為浮點(diǎn)數(shù)StrToInt函數(shù)將字符串轉(zhuǎn)換為整型StrToIntDef函數(shù)將字符串轉(zhuǎn)換為整型或默許值StrToTime函數(shù)將字符串轉(zhuǎn)換為時間格式StrUpper函數(shù)將字符串中的字符轉(zhuǎn)換為大寫Style

19、屬性類型選擇Suce函數(shù)前往后繼的參數(shù)Swap函數(shù)交換參數(shù)的高低地址位Tabs屬性標(biāo)志每一項的內(nèi)容TabIndex屬性標(biāo)志索引Text屬性顯示的文本TextToFloat函數(shù)將字符串以NULL終了的格式轉(zhuǎn)換為浮點(diǎn)數(shù)Time函數(shù)前往當(dāng)前的時間TimeToStr函數(shù)將時間格式轉(zhuǎn)換為字符串Trim函數(shù)從給定的字符串中刪除前導(dǎo)和尾部的空格及控制字符TrimLeft函數(shù)從給定的字符串中刪除首部的空格及控制字符TrimRight函數(shù)從給定的字符串中刪除尾部的空格及控制字符Trunc函數(shù)將實型值截取為整型值Truncate函數(shù)截去當(dāng)前文件位置后的內(nèi)容UnSelectedColor屬性未選中顏色UpCase將

20、字符轉(zhuǎn)換為大寫UpperCase將給定的字符串變?yōu)榇髮慥al函數(shù)將字符串轉(zhuǎn)換為整型值VarArrayCreate函數(shù)以給定的界限和維數(shù)建立變體數(shù)組VarArrayDimCount函數(shù)前往給定變體的維數(shù)VarArrayHighBound函數(shù)前往給定變體數(shù)組維數(shù)的上界VarArrayLock函數(shù)鎖定給定的變體數(shù)組VarArrayLowBound函數(shù)前往給定變體數(shù)組維數(shù)的下界VarArrayOf函數(shù)前往指定變體的數(shù)組元素VarArrayRedim函數(shù)經(jīng)過改動上限來調(diào)整變體的大小VarArrayUnlock函數(shù)解鎖指定的變體數(shù)組VarAsType函數(shù)將變體轉(zhuǎn)換為指定的類型VarCase函數(shù)將變體轉(zhuǎn)換為

21、指定的類型并保管他VarClear函數(shù)去除指定的變體VarCopy函數(shù)將指定的變體復(fù)制為指定的變體VarFormDateTime函數(shù)前往包含日期時間的變體VarIsArray函數(shù)測試變體能否為數(shù)組VarIsEmpty函數(shù)測試變體能否為UNASSIGNEDVarIsNull函數(shù)測試變體能否為NULLVarToDateTime函數(shù)將給定的變體轉(zhuǎn)換為日期時間VarType函數(shù)將變體轉(zhuǎn)換為指定的類型并保管他Visible屬性控件的可見性WantReturns屬性為True時，按回車鍵產(chǎn)生一個回車符；為False時，按下Ctrl+Enter才產(chǎn)生回車符Write命令對有格式的文件，寫一變量到文件組件中；

22、對文本文件，寫一個或多個值到文件中Writeln命令執(zhí)行WRITE過程，然后輸出一行終了標(biāo)志W(wǎng)ideCharLenToString函數(shù)將ANSI字符串轉(zhuǎn)換為UNICODE字符串WideCharLenToStrWar函數(shù)將UNICODE字符串轉(zhuǎn)換為ANSI字符串變量WideCharToString函數(shù)將UNICODE字符串轉(zhuǎn)換為ANSI字符串WideCharToStrVar函數(shù)將UNICODE字符串轉(zhuǎn)換為ANSI字符串變量 delphi字符串函數(shù)大全 函數(shù) function AnsiResemblesText(const AText, AOther: string): Boolean; $Str

23、Utils.pas功能 前往兩個字符串能否類似闡明 ANSI(American National Standards Institute)美國國家規(guī)范協(xié)會;不區(qū)分大小寫參考 function StrUtils.SoundexProc; var StrUtils.AnsiResemblesProc例子 CheckBox1.Checked := AnsiResemblesText(Edit1.Text, Edit2.Text);函數(shù) function AnsiContainsText(const AText, ASubText: string): Boolean; $StrUtils.pas功能

24、前往字符串AText能否包含子串ASubText闡明 不區(qū)分大小寫參考 function StrUtils.AnsiUppercase; function StrUtils.AnsiPos例子 CheckBox1.Checked := AnsiContainsText(Edit1.Text, Edit2.Text); 函數(shù) function AnsiStartsText(const ASubText, AText: string): Boolean; $StrUtils.pas功能 前往字符串AText能否以子串ASubText開頭闡明 不區(qū)分大小寫參考 function Windowspar

25、eString例子 CheckBox1.Checked := AnsiStartsText(Edit1.Text, Edit2.Text); 函數(shù) function AnsiEndsText(const ASubText, AText: string): Boolean; $StrUtils.pas功能 前往字符串AText能否以子串ASubText結(jié)尾闡明 不區(qū)分大小寫參考 function WindowspareString例子 CheckBox1.Checked := AnsiEndsText(Edit1.Text, Edit2.Text); 函數(shù) function AnsiReplac

26、eText(const AText, AFromText, AToText: string): string; $StrUtils.pas功能 前往字符串AText中用子串AFromText交換成子串AToText的結(jié)果闡明 不區(qū)分大小寫參考 function SysUtils.StringReplace; type SysUtils.TReplaceFlags例子 Edit4.Text := AnsiReplaceText(Edit1.Text, Edit2.Text, Edit3.Text); 函數(shù) function AnsiMatchText(const AText: string; c

27、onst AValues: array of string): Boolean; $StrUtils.pas功能 前往字符串?dāng)?shù)組AValues中能否包含字符串AText闡明 不區(qū)分大小寫參考 function StrUtils.AnsiIndexText例子 CheckBox1.Checked := AnsiMatchText(Edit1.Text, a1, a2, a3, a4); 函數(shù) function AnsiIndexText(const AText: string; const AValues: array of string): Integer; $StrUtils.pas功能 前

28、往字符串AText在字符串?dāng)?shù)組AValues中的位置闡明 不區(qū)分大小寫;假設(shè)不包含那么前往-1參考 function SysUtils.AnsiSameText例子 SpinEdit1.Value := AnsiIndexText(Edit1.Text, a1, a2, a3, a4); 函數(shù) function AnsiContainsStr(const AText, ASubText: string): Boolean; $StrUtils.pas功能 前往字符串AText能否包含子串ASubText闡明 區(qū)分大小寫參考 function StrUtils.AnsiPos例子 CheckBo

29、x1.Checked := AnsiContainsStr(Edit1.Text, Edit2.Text);函數(shù) function AnsiStartsStr(const ASubText, AText: string): Boolean; $StrUtils.pas功能 前往字符串AText能否以子串ASubText開頭闡明 區(qū)分大小寫參考 function SysUtils.AnsiSameStr例子 CheckBox1.Checked := AnsiStartsStr(Edit1.Text, Edit2.Text); 函數(shù) function AnsiEndsStr(const ASubT

30、ext, AText: string): Boolean; $StrUtils.pas功能 前往字符串AText能否以子串ASubText結(jié)尾闡明 區(qū)分大小寫參考 function SysUtils.AnsiSameStr例子 CheckBox1.Checked := AnsiEndsStr(Edit1.Text, Edit2.Text); 函數(shù) function AnsiReplaceStr(const AText, AFromText, AToText: string): string; $StrUtils.pas功能 前往字符串AText中用子串AFromText交換成子串AToText

31、的結(jié)果闡明 區(qū)分大小寫參考 function SysUtils.StringReplace; type SysUtils.TReplaceFlags例子 Edit4.Text := AnsiReplaceStr(Edit1.Text, Edit2.Text, Edit3.Text); 函數(shù) function AnsiMatchStr(const AText: string; const AValues: array of string): Boolean; $StrUtils.pas功能 前往字符串?dāng)?shù)組AValues中能否包含字符串AText闡明 區(qū)分大小寫參考 function StrUti

32、ls.AnsiIndexStr例子 CheckBox1.Checked := AnsiMatchStr(Edit1.Text, a1, a2, a3, a4); 函數(shù) function AnsiIndexStr(const AText: string; const AValues: array of string): Integer; $StrUtils.pas功能 前往字符串AText在字符串?dāng)?shù)組AValues中的位置闡明 區(qū)分大小寫參考 function SysUtils.AnsiSameStr例子 SpinEdit1.Value := AnsiIndexStr(Edit1.Text, a

33、1, a2, a3, a4); 函數(shù) function DupeString(const AText: string; ACount: Integer): string; $StrUtils.pas功能 前往字符串AText的ACount個復(fù)本闡明 當(dāng)ACount為0時前往參考 function System.SetLength例子 Edit3.Text := DupeString(Edit1.Text, SpinEdit1.Value); 函數(shù) function ReverseString(const AText: string): string; $StrUtils.pas功能 前往字符串

34、AText的反序闡明 ReverseString(1234) = 4321參考 function System.SetLength例子 Edit3.Text := ReverseString(Edit1.Text);函數(shù) function StuffString(const AText: string; AStart, ALength: Cardinal; const ASubText: string): string; $StrUtils.pas功能 前往嵌套字符串闡明 AStart:嵌套開場位置;ALength:嵌套長度;StuffString(abcd, 2, 0, 12) = a12b

35、cd參考 function System.Copy例子 Edit3.Text := StuffString(Edit1.Text, SpinEdit1.Value, SpinEdit2.Value, Edit2.Text); 函數(shù) function RandomFrom(const AValues: array of string): string; overload; $StrUtils.pas功能 隨機(jī)前往字符串?dāng)?shù)組AValues中的一個元素闡明 之前建議執(zhí)行Randomize參考 function System.Random例子 Randomize; Edit3.Text := Rand

36、omFrom(a1, a2, a3, a4); 函數(shù) function IfThen(AValue: Boolean; const ATrue: string; AFalse: string = ): string; overload; $StrUtils.pas功能 前往指定的邏輯字符串闡明 IfThen(True, 是, 否) = 是;IfThen(False, 是, 否) = 否參考 例子 Edit3.Text := IfThen(CheckBox1.Checked, Edit1.Text, Edit2.Text); 函數(shù) function LeftStr(const AText: st

37、ring; const ACount: Integer): string; $StrUtils.pas功能 前往字符串AText左邊的ACount個字符闡明 LeftStr(123456, 3) = 123參考 function System.Copy例子 Edit3.Text := LeftStr(Edit1.Text, SpinEdit1.Value); 函數(shù) function RightStr(const AText: string; const ACount: Integer): string; $StrUtils.pas功能 前往字符串AText右邊的ACount個字符闡明 Righ

38、tStr(123456, 3) = 456參考 function System.Copy例子 Edit3.Text := RightStr(Edit1.Text, SpinEdit1.Value); 函數(shù) function MidStr(const AText: string; const AStart, ACount: Integer): string; $StrUtils.pas功能 前往字符串AText從AStart開場的ACount個字符闡明 其實就是Copy參考 function System.Copy例子 Edit3.Text := MidStr(Edit1.Text, SpinE

39、dit1.Value, SpinEdit2.Value); 函數(shù) function SearchBuf(Buf: PChar; BufLen: Integer; SelStart, SelLength: Integer; SearchString: String; Options: TStringSearchOptions = soDown): PChar; $StrUtils.pas功能 前往第一個搜索到的指針位置闡明 這函數(shù)常用于文本中搜索字符串參考 例子 /Begin SearchBuffunction SearchEdit(EditControl: TCustomEdit; const

40、 SearchString: String;SearchOptions: TStringSearchOptions; FindFirst: Boolean = False): Boolean;varBuffer, P: PChar;Size: Word;beginResult := False;if (Length(SearchString) = 0) then Exit;Size := EditControl.GetTextLen;if (Size = 0) then Exit;Buffer := StrAlloc(Size + 1);tryEditControl.GetTextBuf(Bu

41、ffer, Size + 1);P := SearchBuf(Buffer, Size, EditControl.SelStart, EditControl.SelLength,SearchString, SearchOptions);if P nil then beginEditControl.SelStart := P - Buffer;EditControl.SelLength := Length(SearchString);Result := True;end;finallyStrDispose(Buffer);end;end;procedure TForm1.Button1Click

42、(Sender: TObject);varSearchOptions: TStringSearchOptions;beginSearchOptions := ;if CheckBox1.Checked thenInclude(SearchOptions, soDown);if CheckBox2.Checked thenInclude(SearchOptions, soMatchCase);if CheckBox3.Checked thenInclude(SearchOptions, soWholeWord);SearchEdit(Memo1, Edit1.Text, SearchOption

43、s);Memo1.SetFocus;end;/End SearchBuf 函數(shù) function Soundex(const AText: string; ALength: TSoundexLength = 4): string; $StrUtils.pas功能 前往探測字符串闡明 根據(jù)探測法(Soundex)可以找到相進(jìn)的字符串;/genealogy/coding.html參考 例子 Edit2.Text := Soundex(Edit1.Text, SpinEdit1.Value);函數(shù) function SoundexInt(const AText: string; ALength: T

44、SoundexIntLength = 4): Integer; $StrUtils.pas功能 前往探測整數(shù)闡明 ALength的值越大解碼準(zhǔn)確率越高參考 例子 SpinEdit2.Value := SoundexInt(Edit1.Text, SpinEdit1.Value); 函數(shù) function DecodeSoundexInt(AValue: Integer): string; $StrUtils.pas功能 前往探測整數(shù)的解碼闡明 DecodeSoundexInt(SoundexInt(hello) 相當(dāng)于 Soundex(hello)參考 例子 Edit2.Text := Dec

45、odeSoundexInt(SpinEdit2.Value); 函數(shù) function SoundexWord(const AText: string): Word; $StrUtils.pas功能 前往探測文字?jǐn)?shù)值闡明 沒有參數(shù)ALength曾經(jīng)固定為4參考 例子 SpinEdit2.Value := SoundexWord(Edit1.Text); 函數(shù) function DecodeSoundexWord(AValue: Word): string; $StrUtils.pas功能 前往探測文字?jǐn)?shù)值的解碼闡明 DecodeSoundexWord(SoundexWord(hello) 相當(dāng)

46、于 Soundex(hello)參考 例子 Edit2.Text := DecodeSoundexWord(SpinEdit2.Value); 函數(shù) function SoundexSimilar(const AText, AOther: string; ALength: TSoundexLength = 4): Boolean; $StrUtils.pas功能 前往兩個字符串的探測字符串能否一樣闡明 Result := Soundex(AText, ALength) = Soundex(AOther, ALength)參考 例子 CheckBox1.Checked := SoundexSim

47、ilar(Edit1.Text, Edit2.Text, SpinEdit1.Value); 函數(shù) function SoundexCompare(const AText, AOther: string; ALength: TSoundexLength = 4): Integer; $StrUtils.pas功能 前往比較兩個字符串的探測字符串的結(jié)果闡明 Result := AnsiCompareStr(Soundex(AText, ALength), Soundex(AOther, ALength)參考 function SysUtils.AnsiCompareStr例子 SpinEdit2

48、.Value := SoundexCompare(Edit1.Text, Edit2.Text, SpinEdit1.Value); 函數(shù) function SoundexProc(const AText, AOther: string): Boolean; $StrUtils.pas功能 調(diào)用SoundexSimilar前往兩個字符串的探測字符串能否一樣闡明 系統(tǒng)變量AnsiResemblesProc的默許值參考 function StrUtils.AnsiResemblesText例子 var AnsiResemblesProc: TCompareTextProc = SoundexPro

49、c;函數(shù) function NewStr(const S: string): PString; deprecated; $SysUtils.pas功能 前往一個新的字符串指針地址闡明 字符串S為空時前往NullStr參考 procedure System.New例子 /Begin NewStr,DisposeStrprocedure TForm1.Button1Click(Sender: TObject);varP: PString;beginP := NewStr(Edit1.Text);Edit2.Text := P;DisposeStr(P);end;/End NewStr,Dispos

50、eStr 函數(shù) procedure DisposeStr(P: PString); deprecated; $SysUtils.pas功能 釋放字符串指針P資源闡明 配合函數(shù)NewStr運(yùn)用參考 procedure System.Dispose例子 函數(shù) procedure AssignStr(var P: PString; const S: string); deprecated; $SysUtils.pas功能 將字符串S更新給字符串指針P闡明 更新值時會釋放以前字符串指針的資源參考 function SysUtils.NewStr;function SysUtils.DisposeStr

51、例子 /Begin AssignStrprocedure TForm1.Button1Click(Sender: TObject);varP: PString;beginP := nil;AssignStr(P, Edit1.Text);Edit2.Text := P;DisposeStr(P);end;/End AssignStr 函數(shù) procedure AppendStr(var Dest: string; const S: string); deprecated; $SysUtils.pas功能 在字符串Dest后追加字符串S闡明 相當(dāng)于Dest := Dest + S;Delphi6

52、曾經(jīng)不建議運(yùn)用參考 例子 /Begin AppendStrprocedure TForm1.Button1Click(Sender: TObject);varS: string;beginS := Edit2.Text;AppendStr(S, Edit1.Text);Edit2.Text := S;end;/End AppendStr 函數(shù) function UpperCase(const S: string): string; $SysUtils.pas功能 前往字符串S的大寫方式闡明 非小寫字符不處置參考 procedure System.SetLength例子 Edit2.Text :

53、= UpperCase(Edit1.Text); 函數(shù) function LowerCase(const S: string): string; $SysUtils.pas功能 前往字符串S的小寫方式闡明 非大寫字符不處置參考 procedure System.SetLength例子 Edit2.Text := LowerCase(Edit1.Text); 函數(shù) function CompareStr(const S1, S2: string): Integer; $SysUtils.pas功能 前往比較兩個字符闡明 當(dāng)S1S2前往值0;當(dāng)S1S2前往值0;當(dāng)S1=S2前往值=0;區(qū)分大小寫參

54、考 例子 SpinEdit1.Value := CompareStr(Edit1.Text, Edit2.Text); 函數(shù) function CompareMem(P1, P2: Pointer; Length: Integer): Boolean; assembler; $SysUtils.pas功能 前往比較兩個內(nèi)存指針闡明 CompareMem(PChar(12a), PChar(12c), 2)=True;CompareMem(PChar(12a), PChar(12c), 3)=False參考 例子 CheckBox1.Checked := CompareMem(Self, For

55、m1, 8); 函數(shù) function CompareText(const S1, S2: string): Integer; $SysUtils.pas功能 前往比較兩個字符串闡明 不區(qū)分大小寫參考 例子 SpinEdit1.Value := CompareText(Edit1.Text, Edit2.Text); 函數(shù) function SameText(const S1, S2: string): Boolean; $SysUtils.pas功能 前往兩個字符串能否相等闡明 不區(qū)分大小寫參考 例子 CheckBox1.Checked := SameText(Edit1.Text, Edi

56、t2.Text); 函數(shù) function AnsiUpperCase(const S: string): string; $SysUtils.pas功能 前往字符串S的大寫方式闡明 ANSI(American National Standards Institute)美國國家規(guī)范協(xié)會;非小寫的字符不變參考 function Windows.CharUpperBuff例子 Edit2.Text := AnsiUpperCase(Edit1.Text);函數(shù) function AnsiLowerCase(const S: string): string; $SysUtils.pas功能 前往字符

57、串S的小寫方式闡明 非大寫字符不處置參考 function Windows.CharLowerBuff例子 Edit2.Text := AnsiLowerCase(Edit1.Text);函數(shù) function AnsiCompareStr(const S1, S2: string): Integer; $SysUtils.pas功能 反回比較兩個字符串闡明 當(dāng)S1S2前往值0;當(dāng)S1S2前往值S2前往值0;當(dāng)S1S2前往值S2前往值0;當(dāng)S1S2前往值S2前往值0;當(dāng)S1S2前往值S2前往值0;當(dāng)S1S2前往值S2前往值0;當(dāng)S1S2前往值S2前往值0;當(dāng)S1S2前往值S2前往值0;當(dāng)S1S

58、2前往值0;當(dāng)S1=S2前往值=0;不區(qū)分大小寫參考 function WindowspareStringW例子 SpinEdit1.Value := WideCompareText(Edit1.Text, Edit2.Text);函數(shù) function WideSameText(const S1, S2: WideString): Boolean; $SysUtils.pas功能 前往兩個雙字節(jié)字符串能否一樣闡明 不區(qū)分大小寫參考 function SysUtils.WideCompareText例子 CheckBox1.Checked := WideSameText(Edit1.Text,

59、 Edit2.Text); 函數(shù) function Trim(const S: string): string; overload; $SysUtils.pas函數(shù) function Trim(const S: WideString): WideString; overload; $SysUtils.pas功能 前往除去字符串S左右不可見字符闡明 小于#32的字符看作不可見字符參考 function System.Copy例子 Edit2.Text := Trim(Edit1.Text);函數(shù) function TrimLeft(const S: string): string; overlo

60、ad; $SysUtils.pas函數(shù) function TrimLeft(const S: WideString): WideString; overload; $SysUtils.pas功能 前往除去字符串S左邊不可見字符闡明 小于#32的字符看作不可見字符參考 function System.Copy例子 Edit2.Text := TrimLeft(Edit1.Text);函數(shù) function TrimRight(const S: string): string; overload; $SysUtils.pas函數(shù) function TrimRight(const S: WideSt