【正文】 DiskSize(3)。返回的值是以“字節(jié)”為單位的。　　　　功能說明：獲取指定磁盤的剩余空間。C:/Windows39。)　　 　else ShowMessage(39?！　⒖紝嵗骸　ar　　 　IsOK: Boolean?！　?　end?！　?　F: TextFile。C:/Windows39。 // 聲明文本文件類型變量　　begin　　 　AssignFile(F, 39。 // 將C:/，后面可以使用F變量對文件進行操作。文件必須要存在?！　egin　　 　S := 39。 Delphi39?！　　　」δ苷f明：刪除字符串左右兩邊的空格(無論左右兩邊有多少個空格均被全部刪除)?！　　　」δ苷f明：將字符串復制到字符數(shù)組中。第一個參數(shù)為要設置的字符串變量或動態(tài)數(shù)組變量，第二個參數(shù)為指定的長度，其取值范圍在0到255之間?！　egin　　 　S := 39。　　注意：Pos函數(shù)在查找時是要區(qū)分字符大小的。 // 用于保存查找的字符所在位置　　begin　　 　nPos := Pos(39。如果使用Copy函數(shù)，則應是H := Copy(39?！　?　H: String?！　nd?！　egin　　 　i:= High(arrText)。電腦報39。因此A變量則等于MSN?！　?所在單元：StrUtils)　　功能說明：返回字符串左邊指定個數(shù)的新字符(串)。　　begin　　 　S := 39?！　⒖紝嵗骸　ar　　 　arrText: array[0..9] of Char?！　⒖紝嵗骸　ar　　 　S: String。, 39。, 39?！　?/下面將獲取I Love China中的“Love”字符串?！　　　」δ苷f明：該函數(shù)用于從字符串中復制指定范圍中的字符。好39。即可將“十六進制”轉換為“十進制”。具體代碼是：I := StrToInt(39。該函數(shù)有二個參數(shù)。當要對不同的類型進行操作時，必須要將不同的類型轉換成同樣的類型。使用函數(shù)可以使代碼更加易讀、易懂，加快編程速度及減少重復代碼。比如，MidStr函數(shù)就未包含在這些單元中，MidStr所屬單元在StrUtils中，因此我們將StrUtils添加Uses中即可?！　⒖紝嵗骸　 := IntToStr(10)?！　?zhí)行結果。 這時I等于100?！　∽⒁猓翰荒苻D換如 StrToInt(39。N為Double類型，用于保存轉換后的浮點型數(shù)據(jù)?！　?　MyStr: String?！　⒖紝嵗骸　ar　　 　S1, S2: String。Borland39?！　　　」δ苷f明：刪除字符串中指定的字符串?！　nd。該函數(shù)有三個參數(shù)。, S, 2)。MSN Messenger39。CPCW39?！　　　」δ苷f明：返回數(shù)組下標的最小值。ABC39。　　Copy函數(shù)與此函數(shù)類似。電腦報39。該函數(shù)有二個參數(shù)?！　nd。該函數(shù)有兩個參數(shù)?！　nd?！　?　SetLength(arrText, 10)。Come on, baby!39?！　nd。)?！　∪?、文件、磁盤操作函數(shù)　　軟件大多都要對文件、磁盤進行操作?！　ssignFile(F, 39。 // 關閉文件　　end?！　　　」δ苷f明：改變當前目錄(文件夾)。當對文件的操作完成后，應該使用CloseFile函數(shù)關閉打開的文件?！　?　Reset(F)。此參數(shù)為欲刪除文件的完整路徑。如果IsOK變量為True，則表示文件刪除成功。如果存在則返回True，反之則為False。Windows文件夾不存在！39?！　⒖紝嵗骸　ar　　 　FreeSize: Int64。當參數(shù)為0時，表示獲取當前磁盤的空間，1為A盤，2為B盤，以此類推。當EOF函數(shù)返回值為True時，則不可以使用Readln函數(shù)進行讀取文件了?！　?　Reset(F)。C:/39?！　nd。該文件存在！39?！　?　nSize: Longint?！　?　CloseFile(F)?！　　　」δ苷f明：創(chuàng)建一個新的子目錄(文件夾)。)。　　 　Reset(F)。)?！　⒖紝嵗骸　ar　　 　S: String。 // 讀取一行文本到S變量中　　end。C:/39?！　ssignFile(F, 39。　　四、內(nèi)存、指針操作函數(shù)　　在編程中，動態(tài)數(shù)組為我們處理數(shù)據(jù)帶來了很大的方便。 // 分配大小為256個字節(jié)的內(nèi)存空間　　end。　　begin　　 　GetMem(Buffer, 256)?！　nd?！　∧J情況下，Delphi新建的工程里，沒有包含大多數(shù)的數(shù)學運行函數(shù)，因此需要在Uses中加入Math單元?！　⒖紝嵗骸　?　e := Exp()。　　(所在單元：Math)　　功能說明：比較兩個數(shù)字，并返回最大的一個數(shù)字。　　　　功能說明：精確計算返回圓周率。 // j等于2 　　end?！　⒖紝嵗骸　rocedure (Sender: TObject)?！　egin　　 　S := DateToStr(Date)?！　〖僭O當前日期為2005年1月2日，那么Label將顯示為2?！　〖僭O當前日期為2005年1月2日，那么Label將顯示為2。　　begin　　 　if IsLeapYear(YearOf(Date)) then ShowMessage(39?！　〖僭O當前日期為2005年1月2日，那么Label將顯示為1?！　⒖紝嵗骸　?:= IntToStr(YearOf(Date))。當要對不同的類型進行操作時，必須要將不同的類型轉換成同樣的類型。該函數(shù)有二個參數(shù)。具體代碼是：I := StrToInt(39。即可將“十六進制”轉換為“十進制”。好39?！　　　」δ苷f明：該函數(shù)用于從字符串中復制指定范圍中的字符?！　?/下面將獲取I Love China中的“Love”字符串。, 39。, 39。　　參考實例：　　var　　 　S: String。　　參考實例：　　var　　 　arrText: array[0..9] of Char?！　egin　　 　S := 39?！　?所在單元：StrUtils)　　功能說明：返回字符串左邊指定個數(shù)的新字符(串)。因此A變量則等于MSN。電腦報39。　　begin　　 　i:= High(arrText)?！　nd。　　 　H: String。如果使用Copy函數(shù)，則應是H := Copy(39。 // 用于保存查找的字符所在位置　　begin　　 　nPos := Pos(39?！　∽⒁猓篜os函數(shù)在查找時是要區(qū)分字符大小的?！　egin　　 　S := 39。第一個參數(shù)為要設置的字符串變量或動態(tài)數(shù)組變量，第二個參數(shù)為指定的長度，其取值范圍在0到255之間。　　　　功能說明：將字符串復制到字符數(shù)組中?！　　　」δ苷f明：刪除字符串左右兩邊的空格(無論左右兩邊有多少個空格均被全部刪除)。 Delphi39?！　egin　　 　S := 39。文件必須要存在。 // 將C:/，后面可以使用F變量對文件進行操作。 // 聲明文本文件類型變量　　begin　　 　AssignFile(F, 39。C:/Windows39?！　?　F: TextFile?！　?　end?！　⒖紝嵗骸　ar　　 　IsOK: Boolean。)　　 　else ShowMessage(39。C:/Windows39?！　　　」δ苷f明：獲取指定磁盤的剩余空間。返回的值是以“字節(jié)”為單位的?！　egin　　 　DiskSize:= DiskSize(3)。　　 　F: TextFile?！　?　end?！　?　Reset(F)。　　參考實例：　　var　　 　IsExists: Boolean。)。)。路徑中不存在的目錄將一同創(chuàng)建。)。　　參考實例：　　var　　 　F: TextFile。如果文件不存在，將會自動創(chuàng)建。 // 打開文件。C:/39?！　egin　　AssignFile(F, 39?！　　　」δ苷f明：寫入一行文本。 // 將C:/，后面可以使用F變量對文件進行操作。因此，這些函數(shù)是必不可少的。 // 聲明一個Integer(整型)指針　　begin　　 　New(P)。 // 釋放內(nèi)存空間　　end。 // 聲明一個Integer(整型)指針　　begin　　 　New(P)。　　 　i: Integer。　　參考實例：　　Floor() = 3　　Floor() = 2　　Floor() = 1　　　　功能說明：返回參數(shù)中的整數(shù)部分。 // k將為20　　end。 // 　　end?！　egin　　 i := Sqr(3)。 + DateToStr(Date)?！　⒖紝嵗骸　ar　　 　S: String?！　〖僭O當前日期為2005年1月2日，那么Label將顯示為7?！　⒖紝嵗骸　?:= IntToStr(DayOf(Date))。不是閏年39。　　begin　　 　 := 39?！　≡贒elphi中調用函數(shù)，一般情況下可以直接使用函數(shù)即可，但由于有一些函數(shù)未包含在Uses中列出的單元中(默認單元有Windows,Messages,SysUtils,Variants,Classes,Graphics, Controls,Forms,Dialogs?！　⒖紝嵗骸　?:= FloatToStr()。10039。6439。10039?！　⒖紝嵗骸　 := StrToFloat()。最后函數(shù)返回一個新的字符串(即是我們指定要復制的字符串內(nèi)容)。　　執(zhí)行結果，MyStr等于“Love”，“Love”字符串在“I Love China!”中第3個位置開始，所以第二個參數(shù)為3，“Love”一共有4個字符，所以第三個參數(shù)為4。 // 連接兩個字符串，S1變量等于AB。 // 連接三個字符，S2變量等于Borland Delphi 。 　　 　// 下面的代碼將刪除S變量中的“C”字符。 // i的值則為9　　end?！　?　Insert(39?！　⒖紝嵗骸　ar　　 　S, A: String?！　⒖紝嵗骸　ar　　nLen1, nLen2: Integer?！　?zhí)行結果，nLen1等于4，nLen2等于6?！　⒖紝嵗骸　ar　　 　S, A: String。第一個參數(shù)為源字符串，第二個參數(shù)為起點，第三個參數(shù)為結束點。, 1, 2)?！　nd。I Like Reading!39。當你查找的是漢字時，最好使用AnsiPos函數(shù)。 // 從最右邊開始，獲取右邊的三個字符。該函數(shù)有兩個參數(shù)。　　end。該函數(shù)有二個參數(shù)。電腦報39?！　opy函數(shù)與此函數(shù)類似。ABC39?！　　　」δ苷f明：返回數(shù)組下標的最小值。CPCW39。MSN Messenger39。, S, 2)。該函數(shù)有三個參數(shù)?！　nd?！　　　」δ苷f明：刪除字符串中指定的字符串。Borland39?！　⒖紝嵗骸　ar　　 　S1, S2: String?！　?　MyStr: String。N為Double類型，用于保存轉換后的浮點型數(shù)據(jù)?！　∽⒁猓翰荒苻D換如 StrToInt(39。 這時I等于100?！　?zhí)行結果?！　⒖紝嵗骸　 := IntToStr(10)。比如，MidStr函數(shù)就未包含在這些單元中，MidStr所屬單元在StrUtils中，因此我們將StrUtils添加Uses中即可。 + DateTimeToStr(Now)?！　nd?！　　　」δ苷f明：根據(jù)指定的年，判斷是否為閏年。7表示星期天，1為星期一，依類類推?！　nd?！　abel顯示為：今天是2005年1月1日?！　×?、日期函數(shù)　　對日期的處理，一般在有日期限制的共享、商業(yè)軟件中經(jīng)常使用到?！　⒖紝嵗骸　ar　　 　I, j: Integer?！　⒖紝嵗骸　ar　　 　k: Integer?！　egin　　 　R := Int()。 // r等于 　　 　i := Abs(156)。 // 賦值　　end?！　⒖紝嵗骸　ar　　 　Buffer: PChar?！　?　Dispose(P) // 釋放內(nèi)存　　end。如果不需要初始化為零，可以使用GetMem代替AllocMem。 // 創(chuàng)建新文件　　 　Writeln(F, S)。　　 　F: TextFile。)。 // 將C:/，后面可以使用F變量對文件進行操作。如果文件存在。　　參考實例：　　var　　 　F: TextFile。C:/39?！　⌒枰⒁獾氖?，如果在本身不存在的目錄中創(chuàng)建子目錄將會失敗。C:/Flash/MyFolder39?！　?　Reset(F)?！　　　」δ苷f明：獲取文件大小。C:/39。 // 關閉文件　　 　Erase(F)?！　　　」δ苷f明：刪除文件。C:/39。返回的值是以“字節(jié)”為單位的。　　　　功能說明：獲取指定磁盤的空間。該參數(shù)用于指定要獲取剩余空間的磁盤號?！　?　if IsExists then ShowMessage(39。)。C:/My Documents/39。 // 關閉文件　　end。C:/39。 // 此時，系統(tǒng)的當前目錄則為C:/Windows目錄。)。 // 以追加的方式打開文件　　 　Writeln(F, S)。　　 　F: TextFile?！　?　A := UpperCase(S)?！　?br />