【正文】 行操作。　　 　F: TextFile。　　　　功能說(shuō)明：判斷文件指針是否移動(dòng)到了文件未尾?！　egin　　 　DiskSize:= DiskSize(3)。該參數(shù)用于指定要獲取磁盤(pán)空間的磁盤(pán)號(hào)。返回的值是以“字節(jié)”為單位的。如果返回值為1，表示指定的磁盤(pán)無(wú)效?！　　　」δ苷f(shuō)明：獲取指定磁盤(pán)的剩余空間。)　　 　else ShowMessage(39。C:/Windows39?！　　　」δ苷f(shuō)明：檢測(cè)指定的文件夾否存在。)　　 　else ShowMessage(39。 // 函數(shù)執(zhí)著后，將結(jié)果返回給IsOK變量。　　參考實(shí)例：　　var　　 　IsOK: Boolean。該函數(shù)只有一個(gè)參數(shù)?！　?　end。 // 將C:/，后面可以使用F變量對(duì)文件進(jìn)行操作?！　?　F: TextFile?！　　　」δ苷f(shuō)明：關(guān)閉文件。C:/Windows39。　　end。 // 聲明文本文件類(lèi)型變量　　begin　　 　AssignFile(F, 39?！　?　CloseFile(F)。 // 將C:/，后面可以使用F變量對(duì)文件進(jìn)行操作。This is a book.39。文件必須要存在?！　nd?！　egin　　 　S := 39。Delphi 39。 Delphi39。　　 　S := Trim(S)?！　　　」δ苷f(shuō)明：刪除字符串左右兩邊的空格(無(wú)論左右兩邊有多少個(gè)空格均被全部刪除)。 // 這里聲明了長(zhǎng)度為256的Char型數(shù)組　　begin　　 　StrPCopy(arrChar, 39?！　　　」δ苷f(shuō)明：將字符串復(fù)制到字符數(shù)組中。 // 當(dāng)設(shè)置后，S變量只能賦值長(zhǎng)度為10的字符串。第一個(gè)參數(shù)為要設(shè)置的字符串變量或動(dòng)態(tài)數(shù)組變量，第二個(gè)參數(shù)為指定的長(zhǎng)度，其取值范圍在0到255之間。因此A變量則等于ger。　　begin　　 　S := 39?！　?所在單元：StrUtils)　　功能說(shuō)明：返回字符串右邊指定個(gè)數(shù)的新字符(串)?！　∽⒁猓篜os函數(shù)在查找時(shí)是要區(qū)分字符大小的。)。 // 用于保存查找的字符所在位置　　begin　　 　nPos := Pos(39?！　　　」δ苷f(shuō)明：查找字符(串)所在位置。如果使用Copy函數(shù)，則應(yīng)是H := Copy(39。 // S變量為Ch　　 　H := MidStr(39?！　?　H: String。通過(guò)第二、第三個(gè)參數(shù)則可指定要復(fù)制字符串的范圍?！　nd?！　egin　　 　S := 39?！　egin　　 　i:= High(arrText)。由于一個(gè)漢字相當(dāng)于兩個(gè)字符的長(zhǎng)度，所以3個(gè)漢字的長(zhǎng)度為6。電腦報(bào)39。 // 用于保存字符串長(zhǎng)度　　begin　　 　nLen1 := Length(39。因此A變量則等于MSN?！　egin　　 　S := 39?！　?所在單元：StrUtils)　　功能說(shuō)明：返回字符串左邊指定個(gè)數(shù)的新字符(串)。h39。　　begin　　 　S := 39。　　　　功能說(shuō)明：插入一個(gè)字符(串)。　　參考實(shí)例：　　var　　 　arrText: array[0..9] of Char?！　?　Delete(S, 16, 1)。　　參考實(shí)例：　　var　　 　S: String?！　nd。, 39?！　?　S2 := Concat(39。, 39?！　　　」δ苷f(shuō)明：連接兩個(gè)或多個(gè)字符串為一個(gè)字符串。　　//下面將獲取I Love China中的“Love”字符串?！　⒖紝?shí)例：　　var　　 　S: String?！　　　」δ苷f(shuō)明：該函數(shù)用于從字符串中復(fù)制指定范圍中的字符?！　∽⒁猓?凡在Edit控件中顯示的文本均為字符串)。好39。)。即可將“十六進(jìn)制”轉(zhuǎn)換為“十進(jìn)制”。)。具體代碼是：I := StrToInt(39。, 2)。該函數(shù)有二個(gè)參數(shù)。 　　　　功能說(shuō)明：該函數(shù)用于將“整數(shù)型”轉(zhuǎn)換成“字符型”。當(dāng)要對(duì)不同的類(lèi)型進(jìn)行操作時(shí)，必須要將不同的類(lèi)型轉(zhuǎn)換成同樣的類(lèi)型。)，所以需要我們手動(dòng)添加單元。使用函數(shù)可以使代碼更加易讀、易懂，加快編程速度及減少重復(fù)代碼。過(guò)程與函數(shù)類(lèi)似，過(guò)程與函數(shù)最重要的區(qū)別在于，過(guò)程沒(méi)有返回值，而函數(shù)能有返回值。比如，MidStr函數(shù)就未包含在這些單元中，MidStr所屬單元在StrUtils中，因此我們將StrUtils添加Uses中即可。因此熟練地掌握數(shù)據(jù)類(lèi)型的轉(zhuǎn)換是非常重要的。　　參考實(shí)例：　　S := IntToStr(10)。第一個(gè)參數(shù)為要轉(zhuǎn)換的十進(jìn)制數(shù)據(jù)，第二個(gè)參數(shù)是指定使用多少位來(lái)顯示十六進(jìn)制數(shù)據(jù)?！　?zhí)行結(jié)果。S/39。 這時(shí)I等于100。　　　　功能說(shuō)明：該函數(shù)用于將“字符型”轉(zhuǎn)換成“整數(shù)型”?！　∽⒁猓翰荒苻D(zhuǎn)換如 StrToInt(39。)這樣的類(lèi)型，因?yàn)樗麄儾⒉淮嬖跀?shù)字型。N為Double類(lèi)型，用于保存轉(zhuǎn)換后的浮點(diǎn)型數(shù)據(jù)。該函數(shù)有3個(gè)參數(shù)。　　 　MyStr: String?！　yStr := Copy(S, 3, 4)?！　⒖紝?shí)例：　　var　　 　S1, S2: String。B39。Borland39。 39?！　　　」δ苷f(shuō)明：刪除字符串中指定的字符串?！　egin　　 　S := 39?！　nd?！　?　i: Integer。該函數(shù)有三個(gè)參數(shù)。Wat is your name?39。, S, 2)。該函數(shù)有兩個(gè)參數(shù)。MSN Messenger39?！　nd。CPCW39。)。　　　　功能說(shuō)明：返回?cái)?shù)組下標(biāo)的最小值。 // i的值則為1　　end。ABC39?！　?所在單元：StrUtils)　　功能說(shuō)明：返回指定范圍內(nèi)的字符串?！　opy函數(shù)與此函數(shù)類(lèi)似?！　egin　　 　S := MidStr(39。電腦報(bào)39。電腦報(bào), 1, 2)，否則返回的將不是“電”字。該函數(shù)有二個(gè)參數(shù)。Like39。　　end。如果要實(shí)現(xiàn)不區(qū)分大小，那么需要使用UpperCase或LowerCase函數(shù)將兩個(gè)參數(shù)的字符(串)轉(zhuǎn)換為“大寫(xiě)”或“小寫(xiě)”再進(jìn)行查找。該函數(shù)有兩個(gè)參數(shù)。MSN Messenger39?！　nd。　　參考實(shí)例：　　var　　 　S: String?！　?　SetLength(arrText, 10)。該函數(shù)有兩個(gè)參數(shù)。Come on, baby!39?！　⒖紝?shí)例：　　var　　 　S: String?！　nd。)。)。abc39?！　∪⑽募?、磁盤(pán)操作函數(shù)　　軟件大多都要對(duì)文件、磁盤(pán)進(jìn)行操作?！　⒖紝?shí)例：　　var　　 　S: String。　　AssignFile(F, 39。 　　 　Append(F)。 // 關(guān)閉文件　　end。C:/39?！　　　」δ苷f(shuō)明：改變當(dāng)前目錄(文件夾)?！　?　ChDir(sDir)。當(dāng)對(duì)文件的操作完成后，應(yīng)該使用CloseFile函數(shù)關(guān)閉打開(kāi)的文件?！　egin　　AssignFile(F, 39?！　?　Reset(F)?！　?　CloseFile(F)。此參數(shù)為欲刪除文件的完整路徑。 // 用于保存刪除狀態(tài)　　begin　　 　IsOK := DeleteFile(39。如果IsOK變量為T(mén)rue，則表示文件刪除成功。文件刪除失??！39。如果存在則返回True，反之則為False。)。Windows文件夾不存在！39。該函數(shù)只有一個(gè)參數(shù)?！　⒖紝?shí)例：　　var　　 　FreeSize: Int64。　　end。當(dāng)參數(shù)為0時(shí)，表示獲取當(dāng)前磁盤(pán)的空間，1為A盤(pán)，2為B盤(pán)，以此類(lèi)推。 // 獲取C盤(pán)的空間。當(dāng)EOF函數(shù)返回值為T(mén)rue時(shí)，則不可以使用Readln函數(shù)進(jìn)行讀取文件了?！　egin　　AssignFile(F, 39。　　 　Reset(F)?！　nd。C:/39。 // 打開(kāi)文件　　 　CloseFile(F)?！　nd?！　egin　　 　IsExists := FileExists(39。該文件存在！39?！　nd?！　?　nSize: Longint。 // 將C:/，后面可以使用F變量對(duì)文件進(jìn)行操作?！　?　CloseFile(F)?！　⒖紝?shí)例：　　ForceDirectories(39。　　　　功能說(shuō)明：創(chuàng)建一個(gè)新的子目錄(文件夾)。 // 在C盤(pán)根目錄中創(chuàng)建了一個(gè)名叫MyFolder的文件夾。)。 // 聲明文本文件類(lèi)型變量　　begin　　 　AssignFile(F, 39?！　?　Reset(F)。使用該函數(shù)，將會(huì)覆蓋文件中的所有內(nèi)容。)。如果文件不存在?！　⒖紝?shí)例：　　var　　 　S: String。)。 // 讀取一行文本到S變量中　　end。C:/39。C:/39。　　參考實(shí)例：　　var　　 　S: String。　　AssignFile(F, 39?！　?　Rewrite(F)?！　∷?、內(nèi)存、指針操作函數(shù)　　在編程中，動(dòng)態(tài)數(shù)組為我們處理數(shù)據(jù)帶來(lái)了很大的方便?！　　　」δ苷f(shuō)明：分配內(nèi)存空間并自動(dòng)初始化為零。 // 分配大小為256個(gè)字節(jié)的內(nèi)存空間　　end?！　?　P^ := 100?！　egin　　 　GetMem(Buffer, 256)?！　　　」δ苷f(shuō)明：分配內(nèi)存空間?！　nd。 // 分配內(nèi)存　　 　P^ := 100。　　默認(rèn)情況下，Delphi新建的工程里，沒(méi)有包含大多數(shù)的數(shù)學(xué)運(yùn)行函數(shù)，因此需要在Uses中加入Math單元?！　egin　　 　r := Abs()?！　⒖紝?shí)例：　　 　e := Exp()?！　⒖紝?shí)例：　　var 　　 　R: Real?！　?所在單元：Math)　　功能說(shuō)明：比較兩個(gè)數(shù)字，并返回最大的一個(gè)數(shù)字?！　?所在單元：Math)　　功能說(shuō)明：比較兩個(gè)數(shù)字，并返回最小的一個(gè)數(shù)字?！　　　」δ苷f(shuō)明：精確計(jì)算返回圓周率?！　　　」δ苷f(shuō)明：對(duì)一個(gè)實(shí)數(shù)進(jìn)行四舍五入。 // j等于2 　　end。 // i等于9　　end?！　⒖紝?shí)例：　　procedure (Sender: TObject)?！　nd?！　egin　　 　S := DateToStr(Date)?！　egin　　 　S := DateTimeToStr(Now)?！　〖僭O(shè)當(dāng)前日期為2005年1月2日，那么Label將顯示為2。根據(jù)返回的值來(lái)判斷是周幾。　　假設(shè)當(dāng)前日期為2005年1月2日，那么Label將顯示為2?！　〖僭O(shè)當(dāng)前日期為2005年1月2日，那么Label將顯示為2?！　egin　　 　if IsLeapYear(YearOf(Date)) then ShowMessage(39。)?！　〖僭O(shè)當(dāng)前日期為2005年1月2日，那么Label將顯示為1?，F(xiàn)在是：39?！　⒖紝?shí)例：　　 := IntToStr(YearOf(Date))。)，所以需要我們手動(dòng)添加單元。當(dāng)要對(duì)不同的類(lèi)型進(jìn)行操作時(shí)，必須要將不同的類(lèi)型轉(zhuǎn)換成同樣的類(lèi)型。 　　　　功能說(shuō)明：該函數(shù)用于將“整數(shù)型”轉(zhuǎn)換成“字符型”。該函數(shù)有二個(gè)參數(shù)。, 2)。具體代碼是：I := StrToInt(39。)。即可將“十六進(jìn)制”轉(zhuǎn)換為“十進(jìn)制”。)。好39?！　∽⒁猓?凡在Edit控件中顯示的文本均為字符串)?！　　　」δ苷f(shuō)明：該函數(shù)用于從字符串中復(fù)制指定范圍中的字符。　　參考實(shí)例：　　var　　 　S: String?！　?/下面將獲取I Love China中的“Love”字符串?！　　　」δ苷f(shuō)明：連接兩個(gè)或多個(gè)字符串為一個(gè)字符串。, 39?！　?　S2 := Concat(39。, 39?！　nd?！　⒖紝?shí)例：　　var　　 　S: String?！　?　Delete(S, 16, 1)。　　參考實(shí)例：　　var　　 　arrText: array[0..9] of Char?！　　　」δ苷f(shuō)明：插入一個(gè)字符(串)。　　begin　　 　S := 39。h39?！　?所在單元：StrUtils)　　功能說(shuō)明：返回字符串左邊指定個(gè)數(shù)的新字符(串)?！　egin　　 　S := 39。因此A變量則等于MSN。 // 用于保存字符串長(zhǎng)度　　begin　　 　nLen1 := Length(39。電腦報(bào)39。由于一個(gè)漢字相當(dāng)于兩個(gè)字符的長(zhǎng)度，所以3個(gè)漢字的長(zhǎng)度為6。　　begin　　 　i:= High(arrText)?！　egin　　 　S := 39?！　nd。通過(guò)第二、第三個(gè)參數(shù)則可指定要復(fù)制字符串的范圍?！　?　H: String。 // S變量為Ch　　 　H := MidStr(39。如果使用Copy函數(shù)，則應(yīng)是H := Copy(39。　　　　功能說(shuō)明：查找字符(串)所在位置。 // 用于保存查找的字符所在位置　　begin　　 　nPos := Pos(39。)。　　注意：Pos函數(shù)在查找時(shí)是要區(qū)分字符大小的。　　(所在單元：StrUtils)　　功能說(shuō)明：返回字符串右邊指定個(gè)數(shù)的新字符(串)?！　egin　　 　S := 39。因此A變量則等于ger。第一個(gè)參數(shù)為要設(shè)置的字符串變量或動(dòng)態(tài)數(shù)組變量，第二個(gè)參數(shù)為指定的長(zhǎng)度，其取值范圍在0到255之間。 // 當(dāng)設(shè)置后，S變量只能賦值長(zhǎng)度為10的字符串?！　　　」δ苷f(shuō)明：將字符串復(fù)制到字符數(shù)組中。 // 這里聲明了長(zhǎng)度為256的Char型數(shù)組　　begin　　 　StrPCopy(arrChar, 39?！　　　」δ苷f(shuō)明：刪除字符串左右兩邊的空格(無(wú)論左右兩邊有多少個(gè)空格均被全部刪除)?！　?　S := Trim(S)。 Delphi39。Delphi 39?！　egin