函數(shù)由一句或多句代碼組成，可以實(shí)現(xiàn)某個(gè)特定的功能。使用函數(shù)可以使代碼更加易讀、易懂，加快編程速度及減少重復(fù)代碼。過程與函數(shù)類似，過程與函數(shù)最重要的區(qū)別在于，過程沒有返回值，而函數(shù)能有返回值。
　　在Delphi 7.0中，已為我們定義好了非常多的函數(shù)，大致分類有6種：數(shù)據(jù)類型轉(zhuǎn)換函數(shù)、字符串、數(shù)組操作函數(shù)、文件、磁盤操作函數(shù)、內(nèi)存、指針操作函數(shù)、數(shù)學(xué)運(yùn)算函數(shù)、日期函數(shù)。

　　在Delphi中調(diào)用函數(shù)，一般情況下可以直接使用函數(shù)即可，但由于有一些函數(shù)未包含在Uses中列出的單元中(默認(rèn)單元有Windows,Messages,SysUtils,Variants,Classes,Graphics, Controls,Forms,Dialogs;)，所以需要我們手動(dòng)添加單元。比如，MidStr函數(shù)就未包含在這些單元中，MidStr所屬單元在StrUtils中，因此我們將StrUtils添加Uses中即可。

　　在本手冊(cè)中，凡是未包含在默認(rèn)列出的單元中的函數(shù)，都標(biāo)明了其所屬的單元，使用時(shí)應(yīng)當(dāng)注意。

　　一、數(shù)據(jù)類型轉(zhuǎn)換函數(shù)
　　在我們編寫程序當(dāng)中，根據(jù)不同情況，會(huì)使用到多種數(shù)據(jù)類型。當(dāng)要對(duì)不同的類型進(jìn)行操作時(shí)，必須要將不同的類型轉(zhuǎn)換成同樣的類型。因此熟練地掌握數(shù)據(jù)類型的轉(zhuǎn)換是非常重要的。

　　1.FloatToStr
　　功能說明：該函數(shù)用于將“浮點(diǎn)型”轉(zhuǎn)換成“字符型”。

　　參考實(shí)例：

　　Edit1.Text := FloatToStr(1.981); 

　　2.IntToStr
　　功能說明：該函數(shù)用于將“整數(shù)型”轉(zhuǎn)換成“字符型”。

　　參考實(shí)例：

　　S := IntToStr(10);(注：S為String類型變量。)

　　3.IntToHex
　　功能說明：該函數(shù)用于將“十進(jìn)制”轉(zhuǎn)換成“十進(jìn)制”。該函數(shù)有二個(gè)參數(shù)。第一個(gè)參數(shù)為要轉(zhuǎn)換的十進(jìn)制數(shù)據(jù)，第二個(gè)參數(shù)是指定使用多少位來顯示十六進(jìn)制數(shù)據(jù)。

　　參考實(shí)例：

　　Edit1.Text := IntToHex('100', 2);

　　執(zhí)行結(jié)果，Edit1.Text等于64。

　　注意：Delphi沒有提供專門的“十六進(jìn)制”轉(zhuǎn)換為“十進(jìn)制”的函數(shù)。使用StrToInt函數(shù)可以實(shí)現(xiàn)這個(gè)功能。具體代碼是：I := StrToInt('S\' + '64'); 這時(shí)I等于100。加上一個(gè)'S\'即可將“十六進(jìn)制”轉(zhuǎn)換為“十進(jìn)制”。

　　4.StrToInt
　　功能說明：該函數(shù)用于將“字符型”轉(zhuǎn)換成“整數(shù)型”。

　　參考實(shí)例：

　　I := StrToInt('100');

　　注意：不能轉(zhuǎn)換如 StrToInt('ab')或StrToInt('好')這樣的類型，因?yàn)樗麄儾⒉淮嬖跀?shù)字型。

　　5.StrToFloat
　　功能說明：該函數(shù)用于將“字符型”轉(zhuǎn)換成“浮點(diǎn)型”。

　　參考實(shí)例：

　　N := StrToFloat(Edit1.Text);

　　注意：Edit1.Text中的內(nèi)容為1.981(凡在Edit控件中顯示的文本均為字符串)。N為Double類型，用于保存轉(zhuǎn)換后的浮點(diǎn)型數(shù)據(jù)。

　　二、字符串、數(shù)組操作函數(shù)
　　對(duì)字符串及數(shù)組的操作，是每個(gè)程序員必須要掌握的。熟練的使用這些函數(shù)，在編程時(shí)能更加得心應(yīng)手。

　　1.Copy
　　功能說明：該函數(shù)用于從字符串中復(fù)制指定范圍中的字符。該函數(shù)有3個(gè)參數(shù)。第一個(gè)參數(shù)是數(shù)據(jù)源(即被復(fù)制的字符串)，第二個(gè)參數(shù)是從字符串某一處開始復(fù)制，第三個(gè)參數(shù)是要復(fù)制字符串的長(zhǎng)度(即個(gè)數(shù))。最后函數(shù)返回一個(gè)新的字符串(即是我們指定要復(fù)制的字符串內(nèi)容)。

　　參考實(shí)例：

　　var

　　 　S: String;

　　 　MyStr: String; // 保存新的字符串

　　begin

　　 　S := 'I Love China!';

　　//下面將獲取I Love China中的“Love”字符串。

　　MyStr := Copy(S, 3, 4);

　　end;

　　執(zhí)行結(jié)果，MyStr等于“Love”，“Love”字符串在“I Love China!”中第3個(gè)位置開始，所以第二個(gè)參數(shù)為3，“Love”一共有4個(gè)字符，所以第三個(gè)參數(shù)為4。

　　2.Concat
　　功能說明：連接兩個(gè)或多個(gè)字符串為一個(gè)字符串。

　　參考實(shí)例：

　　var

　　 　S1, S2: String;

　　begin

　　 　S1 := Concat('A', 'B'); // 連接兩個(gè)字符串，S1變量等于AB。

　　 　S2 := Concat('Borland', ' Delphi', ' 7.0'); // 連接三個(gè)字符，S2變量等于Borland Delphi 7.0。

　　end;

　　3.Delete
　　功能說明：刪除字符串中指定的字符串。該函數(shù)有三個(gè)參數(shù)。第一個(gè)參數(shù)為要進(jìn)行處理的字符串，第二個(gè)參數(shù)為從何處開始刪除，第三個(gè)參數(shù)為刪除的字符個(gè)數(shù)。

　　參考實(shí)例：

　　var

　　 　S: String;

　　begin

　　 　S := 'I Like Reading CPCW.'; 

　　 　// 下面的代碼將刪除S變量中的“C”字符。

　　 　Delete(S, 16, 1);

　　end;

　　此時(shí)S變量則是I Like Reading PCW.(“C”已經(jīng)不存在了)。

　　4.High
　　功能說明：返回?cái)?shù)組下標(biāo)的最大值。

　　參考實(shí)例：

　　var

　　 　arrText: array[0..9] of Char;

　　 　i: Integer;

　　begin

　　 　i := High(arrText); // i的值則為9

　　end;

　　5.Insert
　　功能說明：插入一個(gè)字符(串)。該函數(shù)有三個(gè)參數(shù)。第一個(gè)參數(shù)為要插入的字符(串)，第二個(gè)參數(shù)為被插入字符串(源字符串)，第三個(gè)參數(shù)為從何處插入。

　　參考實(shí)例：

　　var

　　 　S: String;

　　begin

　　 　S := 'Wat is your name?';

　　 　// 上面句子中的What單詞查一個(gè)“h”字符，下面使用Insert函數(shù)將h添加進(jìn)去。

　　 　Insert('h', S, 2); // 將“h”從第2位處插入。

　　end;

　　6.LeftStr(所在單元：StrUtils)
　　功能說明：返回字符串左邊指定個(gè)數(shù)的新字符(串)。該函數(shù)有兩個(gè)參數(shù)。第一個(gè)參數(shù)為完整的字符串，第二個(gè)參數(shù)為指定個(gè)數(shù)。

　　參考實(shí)例：

　　var

　　 　S, A: String;

　　begin

　　 　S := 'MSN Messenger';

　　 A := LeftStr(S, 3); // 從最左邊開始，獲取左邊的三個(gè)字符。因此A變量則等于MSN。

　　end;

　　7.Length
　　功能說明：該函數(shù)用于統(tǒng)計(jì)指定字符串的長(zhǎng)度(即個(gè)數(shù))。

　　參考實(shí)例：

　　var

　　nLen1, nLen2: Integer; // 用于保存字符串長(zhǎng)度

　　begin

　　 　nLen1 := Length('CPCW');

　　nLen2 := Length('電腦報(bào)');

　　end;

　　執(zhí)行結(jié)果，nLen1等于4，nLen2等于6。由于一個(gè)漢字相當(dāng)于兩個(gè)字符的長(zhǎng)度，所以3個(gè)漢字的長(zhǎng)度為6。

　　8.Low
　　功能說明：返回?cái)?shù)組下標(biāo)的最小值。

　　參考實(shí)例：

　　var

　　 　arrText: array[1..9] of Char;

　　 　i: Integer;

　　begin

　　 　i:= High(arrText); // i的值則為1

　　end;

　　9.LowerCase
　　功能說明：將字符(串)中的英文字符轉(zhuǎn)換為小寫。

　　參考實(shí)例：

　　var

　　 　S, A: String;

　　begin

　　 　S := 'ABC';

　　 　A := UpperCase(S); // 經(jīng)過UpperCase函數(shù)轉(zhuǎn)換后，A則等于abc。

　　end;

　　10.MidStr(所在單元：StrUtils)
　　功能說明：返回指定范圍內(nèi)的字符串。該函數(shù)有三個(gè)參數(shù)。第一個(gè)參數(shù)為源字符串，第二個(gè)參數(shù)為起點(diǎn)，第三個(gè)參數(shù)為結(jié)束點(diǎn)。通過第二、第三個(gè)參數(shù)則可指定要復(fù)制字符串的范圍。

　　Copy函數(shù)與此函數(shù)類似。MidStr主要用于處理含有中文字符的字符串。

　　參考實(shí)例：

　　var

　　 　S: String;

　　 　H: String;

　　begin

　　 　S := MidStr('China', 1, 2); // S變量為Ch

　　 　H := MidStr('電腦報(bào)', 1, 1); // H變量為“電”。如果使用Copy函數(shù)，則應(yīng)是H := Copy('電腦報(bào), 1, 2)，否則返回的將不是“電”字。因此在使用操作含有中文的字符串時(shí)，最好使用MidStr。

　　end;

　　11.Pos
　　功能說明：查找字符(串)所在位置。該函數(shù)有二個(gè)參數(shù)。第一個(gè)參數(shù)為要查找的字符(串)，第二個(gè)參數(shù)為被查找字符(串)。

　　參考實(shí)例：

　　var

　　 　nPos: Integer; // 用于保存查找的字符所在位置

　　begin

　　 　nPos := Pos('Like', 'I Like Reading!');

　　end;

　　此時(shí)nPos等于3。如果沒有查找到，則nPos為0。

　　注意：Pos函數(shù)在查找時(shí)是要區(qū)分字符大小的。如果要實(shí)現(xiàn)不區(qū)分大小，那么需要使用UpperCase或LowerCase函數(shù)將兩個(gè)參數(shù)的字符(串)轉(zhuǎn)換為“大寫”或“小寫”再進(jìn)行查找。

　　另外還有一個(gè)查找字符(串)的函數(shù)----AnsiPos，該函數(shù)的使用方法與Pos函數(shù)完全一樣。當(dāng)你查找的是漢字時(shí)，最好使用AnsiPos函數(shù)。

　　12.RightStr(所在單元：StrUtils)
　　功能說明：返回字符串右邊指定個(gè)數(shù)的新字符(串)。該函數(shù)有兩個(gè)參數(shù)。第一個(gè)參數(shù)為完整的字符串，第二個(gè)參數(shù)為指定個(gè)數(shù)。

　　參考實(shí)例：

　　var

　　 　S, A: String;

　　begin

　　 　S := 'MSN Messenger';

　　 　A := RightStr(S, 3); // 從最右邊開始，獲取右邊的三個(gè)字符。因此A變量則等于ger。

　　end;

　　13.SetLength
　　功能說明：設(shè)置字符串或動(dòng)態(tài)數(shù)組長(zhǎng)度。該函數(shù)有兩個(gè)參數(shù)。第一個(gè)參數(shù)為要設(shè)置的字符串變量或動(dòng)態(tài)數(shù)組變量，第二個(gè)參數(shù)為指定的長(zhǎng)度，其取值范圍在0到255之間。

　　參考實(shí)例：

　　var

　　 　S: String;

　　 　arrText: array of Char; // 定義一個(gè)動(dòng)態(tài)數(shù)組

　　begin

　　 　SetLength(S, 10); // 當(dāng)設(shè)置后，S變量只能賦值長(zhǎng)度為10的字符串。

　　 　SetLength(arrText, 10); // 只有使用SetLength為動(dòng)態(tài)數(shù)組分配內(nèi)存空間后才能使用動(dòng)態(tài)數(shù)組。這句代碼的作用相當(dāng)于arrText: array[0..9] of Char

　　end;

　　14.StrPCopy
　　功能說明：將字符串復(fù)制到字符數(shù)組中。該函數(shù)有兩個(gè)參數(shù)。第一個(gè)參數(shù)為“目標(biāo)數(shù)組”，第二個(gè)參數(shù)為“字符串”。

　　參考實(shí)例：

　　var

　　 　arrChar: array[0..255] of Char; // 這里聲明了長(zhǎng)度為256的Char型數(shù)組

　　begin

　　 　StrPCopy(arrChar, 'Come on, baby!');

　　end;

　　15.Trim
　　功能說明：刪除字符串左右兩邊的空格(無論左右兩邊有多少個(gè)空格均被全部刪除)。

　　參考實(shí)例：

　　var

　　 　S: String;

　　begin

　　 　S := ' Delphi 7.0 ';

　　 　S := Trim(S);

　　end;

　　16.TrimLeft
　　功能說明：刪除字符串左邊的空格(無論左邊有多少個(gè)空格均被全部刪除)。

　　參考實(shí)例：

　　 　S := TrimLeft(' Delphi');

　　17.TrimRight
　　功能說明：刪除字符串左邊的空格(無論左邊有多少個(gè)空格均被全部刪除)。

　　參考實(shí)例：

　　 　S := TrimRight('Delphi ');

　　18.UpperCase
　　功能說明：將字符(串)中的英文字符轉(zhuǎn)換為大寫。

　　參考實(shí)例：

　　var

　　 　S, A: String;

　　begin

　　 　S := 'abc';

　　 　A := UpperCase(S); // 經(jīng)過UpperCase函數(shù)轉(zhuǎn)換后，A則等于ABC。

　　end;

　　三、文件、磁盤操作函數(shù)
　　軟件大多都要對(duì)文件、磁盤進(jìn)行操作。熟悉掌握這些函數(shù)可以幫助你輕松實(shí)現(xiàn)創(chuàng)建、刪除、保存文件等功能。

　　1.Append
　　功能說明：追加內(nèi)容到文件中。文件必須要存在。

　　參考實(shí)例：

　　var

　　 　S: String;

　　 　F: TextFile;

　　begin

　　 　S := 'This is a book.';

　　AssignFile(F, 'C:\MyFile.txt'); // 將C:\MyFile.txt文件與F變量建立連接，后面可以使用F變量對(duì)文件進(jìn)行操作。 

　　 　Append(F); // 以追加的方式打開文件

　　 　Writeln(F, S); // 將S變量中的內(nèi)容追加到文本尾后。

　　 　CloseFile(F); // 關(guān)閉文件

　　end;

　　2.AssignFile
　　功能說明：與指定的文件建立連接。

　　參考實(shí)例：

　　var

　　 　F: TextFile; // 聲明文本文件類型變量

　　begin

　　 　AssignFile(F, 'C:\MyFile.txt'); // 將C:\MyFile.txt文件與F變量建立連接，后面可以使用F變量對(duì)文件進(jìn)行操作。

　　end;

　　3.ChDir
　　功能說明：改變當(dāng)前目錄(文件夾)。

　　參考實(shí)例：

　　var

　　 　sDir: String;

　　begin

　　 　sDir := 'C:\Windows';

　　 　ChDir(sDir); // 此時(shí)，系統(tǒng)的當(dāng)前目錄則為C:\Windows目錄。

　　end;

　　4.CloseFile
　　功能說明：關(guān)閉文件。當(dāng)對(duì)文件的操作完成后，應(yīng)該使用CloseFile函數(shù)關(guān)閉打開的文件。

　　參考實(shí)例：

　　var

　　 　S: String;

　　 　AllText: String;

　　 　F: TextFile;

　　begin

　　AssignFile(F, 'C:\MyFile.txt'); // 將C:\MyFile.txt文件與F變量建立連接，后面可以使用F變量對(duì)文件進(jìn)行操作。

　　 　Reset(F); // 打開文件

　　 　while not EOF(F) do begin // 使用While循環(huán)，一直判斷是否到了文件未尾

　　 　　Readln(F, S); // 讀取一行文本

　　 　　AllText := AllText + S;

　　 　end;

　　 　CloseFile(F); // 關(guān)閉文件

　　end;

　　5.DeleteFile
　　功能說明：刪除指定的文件。該函數(shù)只有一個(gè)參數(shù)。此參數(shù)為欲刪除文件的完整路徑。如果刪除成功，則返回True。若刪除失敗、或文件不存在則返回False。

　　參考實(shí)例：

　　var

　　 　IsOK: Boolean; // 用于保存刪除狀態(tài)

　　begin

　　 　IsOK := DeleteFile('C:\My Documents\Index.html'); // 函數(shù)執(zhí)著后，將結(jié)果返回給IsOK變量。如果IsOK變量為True，則表示文件刪除成功。

　　 　if IsOK then ShowMessage('文件刪除成功！')

　　 　else ShowMessage('文件刪除失敗！');

　　end;

　　6.DirectoryExists
　　功能說明：檢測(cè)指定的文件夾否存在。如果存在則返回True，反之則為False。

　　參考實(shí)例：

　　var

　　 　IsExists: Boolean;

　　begin

　　 　IsExists := DirectoryExists ('C:\Windows');

　　 　if IsExists then ShowMessage('Windows文件夾存在！')

　　 　else ShowMessage('Windows文件夾不存在！');

　　end;

　　7.DiskFree
　　功能說明：獲取指定磁盤的剩余空間。該函數(shù)只有一個(gè)參數(shù)。該參數(shù)用于指定要獲取剩余空間的磁盤號(hào)。當(dāng)參數(shù)為0時(shí)，表示獲取當(dāng)前磁盤的剩余空間，1為A盤，2為B盤，以此類推。如果返回值為-1，表示指定的磁盤無效。

　　參考實(shí)例：

　　var

　　 　FreeSize: Int64;

　　begin

　　 　FreeSize := DiskFree(3); // 獲取C盤中的剩余空間。返回的值是以“字節(jié)”為單位的。

　　end;

　　8.DiskSize
　　功能說明：獲取指定磁盤的空間。該函數(shù)只有一個(gè)參數(shù)。該參數(shù)用于指定要獲取磁盤空間的磁盤號(hào)。當(dāng)參數(shù)為0時(shí)，表示獲取當(dāng)前磁盤的空間，1為A盤，2為B盤，以此類推。如果返回值為-1，表示指定的磁盤無效。

　　參考實(shí)例：

　　var

　　 　DiskSize: Int64;

　　begin

　　 　DiskSize:= DiskSize(3); // 獲取C盤的空間。返回的值是以“字節(jié)”為單位的。

　　end;

　　9.EOF
　　功能說明：判斷文件指針是否移動(dòng)到了文件未尾。當(dāng)EOF函數(shù)返回值為True時(shí)，則不可以使用Readln函數(shù)進(jìn)行讀取文件了。

　　參考實(shí)例：

　　var

　　 　S: String;

　　 　AllText: String;

　　 　F: TextFile;

　　begin

　　AssignFile(F, 'C:\MyFile.txt'); // 將C:\MyFile.txt文件與F變量建立連接，后面可以使用F變量對(duì)文件進(jìn)行操作。