?? delphi 7.0常用函數速查手冊.txt
字號:
函數由一句或多句代碼組成,可以實現某個特定的功能。使用函數可以使代碼更加易讀、易懂,加快編程速度及減少重復代碼。過程與函數類似,過程與函數最重要的區別在于,過程沒有返回值,而函數能有返回值。
在Delphi 7.0中,已為我們定義好了非常多的函數,大致分類有6種:數據類型轉換函數、字符串、數組操作函數、文件、磁盤操作函數、內存、指針操作函數、數學運算函數、日期函數。
在Delphi中調用函數,一般情況下可以直接使用函數即可,但由于有一些函數未包含在Uses中列出的單元中(默認單元有Windows,Messages,SysUtils,Variants,Classes,Graphics, Controls,Forms,Dialogs;),所以需要我們手動添加單元。比如,MidStr函數就未包含在這些單元中,MidStr所屬單元在StrUtils中,因此我們將StrUtils添加Uses中即可。
在本手冊中,凡是未包含在默認列出的單元中的函數,都標明了其所屬的單元,使用時應當注意。
一、數據類型轉換函數
在我們編寫程序當中,根據不同情況,會使用到多種數據類型。當要對不同的類型進行操作時,必須要將不同的類型轉換成同樣的類型。因此熟練地掌握數據類型的轉換是非常重要的。
1.FloatToStr
功能說明:該函數用于將“浮點型”轉換成“字符型”。
參考實例:
Edit1.Text := FloatToStr(1.981);
2.IntToStr
功能說明:該函數用于將“整數型”轉換成“字符型”。
參考實例:
S := IntToStr(10);(注:S為String類型變量。)
3.IntToHex
功能說明:該函數用于將“十進制”轉換成“十進制”。該函數有二個參數。第一個參數為要轉換的十進制數據,第二個參數是指定使用多少位來顯示十六進制數據。
參考實例:
Edit1.Text := IntToHex(''100'', 2);
執行結果,Edit1.Text等于64。
注意:Delphi沒有提供專門的“十六進制”轉換為“十進制”的函數。使用StrToInt函數可以實現這個功能。具體代碼是:I := StrToInt(''S\'' + ''64''); 這時I等于100。加上一個''S\''即可將“十六進制”轉換為“十進制”。
4.StrToInt
功能說明:該函數用于將“字符型”轉換成“整數型”。
參考實例:
I := StrToInt(''100'');
注意:不能轉換如 StrToInt(''ab'')或StrToInt(''好'')這樣的類型,因為他們并不存在數字型。
5.StrToFloat
功能說明:該函數用于將“字符型”轉換成“浮點型”。
參考實例:
N := StrToFloat(Edit1.Text);
注意:Edit1.Text中的內容為1.981(凡在Edit控件中顯示的文本均為字符串)。N為Double類型,用于保存轉換后的浮點型數據。
二、字符串、數組操作函數
對字符串及數組的操作,是每個程序員必須要掌握的。熟練的使用這些函數,在編程時能更加得心應手。
1.Copy
功能說明:該函數用于從字符串中復制指定范圍中的字符。該函數有3個參數。第一個參數是數據源(即被復制的字符串),第二個參數是從字符串某一處開始復制,第三個參數是要復制字符串的長度(即個數)。最后函數返回一個新的字符串(即是我們指定要復制的字符串內容)。
參考實例:
var
S: String;
MyStr: String; // 保存新的字符串
begin
S := ''I Love China!'';
//下面將獲取I Love China中的“Love”字符串。
MyStr := Copy(S, 3, 4);
end;
執行結果,MyStr等于“Love”,“Love”字符串在“I Love China!”中第3個位置開始,所以第二個參數為3,“Love”一共有4個字符,所以第三個參數為4。
2.Concat
功能說明:連接兩個或多個字符串為一個字符串。
參考實例:
var
S1, S2: String;
begin
S1 := Concat(''A'', ''B''); // 連接兩個字符串,S1變量等于AB。
S2 := Concat(''Borland'', '' Delphi'', '' 7.0''); // 連接三個字符,S2變量等于Borland Delphi 7.0。
end;
3.Delete
功能說明:刪除字符串中指定的字符串。該函數有三個參數。第一個參數為要進行處理的字符串,第二個參數為從何處開始刪除,第三個參數為刪除的字符個數。
參考實例:
var
S: String;
begin
S := ''I Like Reading CPCW.'';
// 下面的代碼將刪除S變量中的“C”字符。
Delete(S, 16, 1);
end;
此時S變量則是I Like Reading PCW.(“C”已經不存在了)。
4.High
功能說明:返回數組下標的最大值。
參考實例:
var
arrText: array[0..9] of Char;
i: Integer;
begin
i := High(arrText); // i的值則為9
end;
5.Insert
功能說明:插入一個字符(串)。該函數有三個參數。第一個參數為要插入的字符(串),第二個參數為被插入字符串(源字符串),第三個參數為從何處插入。
參考實例:
var
S: String;
begin
S := ''Wat is your name?'';
// 上面句子中的What單詞查一個“h”字符,下面使用Insert函數將h添加進去。
Insert(''h'', S, 2); // 將“h”從第2位處插入。
end;
6.LeftStr(所在單元:StrUtils)
功能說明:返回字符串左邊指定個數的新字符(串)。該函數有兩個參數。第一個參數為完整的字符串,第二個參數為指定個數。
參考實例:
var
S, A: String;
begin
S := ''MSN Messenger'';
A := LeftStr(S, 3); // 從最左邊開始,獲取左邊的三個字符。因此A變量則等于MSN。
end;
7.Length
功能說明:該函數用于統計指定字符串的長度(即個數)。
參考實例:
var
nLen1, nLen2: Integer; // 用于保存字符串長度
begin
nLen1 := Length(''CPCW'');
nLen2 := Length(''電腦報'');
end;
執行結果,nLen1等于4,nLen2等于6。由于一個漢字相當于兩個字符的長度,所以3個漢字的長度為6。
8.Low
功能說明:返回數組下標的最小值。
參考實例:
var
arrText: array[1..9] of Char;
i: Integer;
begin
i:= High(arrText); // i的值則為1
end;
9.LowerCase
功能說明:將字符(串)中的英文字符轉換為小寫。
參考實例:
var
S, A: String;
begin
S := ''ABC'';
A := UpperCase(S); // 經過UpperCase函數轉換后,A則等于abc。
end;
10.MidStr(所在單元:StrUtils)
功能說明:返回指定范圍內的字符串。該函數有三個參數。第一個參數為源字符串,第二個參數為起點,第三個參數為結束點。通過第二、第三個參數則可指定要復制字符串的范圍。
Copy函數與此函數類似。MidStr主要用于處理含有中文字符的字符串。
參考實例:
var
S: String;
H: String;
begin
S := MidStr(''China'', 1, 2); // S變量為Ch
H := MidStr(''電腦報'', 1, 1); // H變量為“電”。如果使用Copy函數,則應是H := Copy(''電腦報, 1, 2),否則返回的將不是“電”字。因此在使用操作含有中文的字符串時,最好使用MidStr。
end;
11.Pos
功能說明:查找字符(串)所在位置。該函數有二個參數。第一個參數為要查找的字符(串),第二個參數為被查找字符(串)。
參考實例:
var
nPos: Integer; // 用于保存查找的字符所在位置
begin
nPos := Pos(''Like'', ''I Like Reading!'');
end;
此時nPos等于3。如果沒有查找到,則nPos為0。
注意:Pos函數在查找時是要區分字符大小的。如果要實現不區分大小,那么需要使用UpperCase或LowerCase函數將兩個參數的字符(串)轉換為“大寫”或“小寫”再進行查找。
另外還有一個查找字符(串)的函數----AnsiPos,該函數的使用方法與Pos函數完全一樣。當你查找的是漢字時,最好使用AnsiPos函數。
12.RightStr(所在單元:StrUtils)
功能說明:返回字符串右邊指定個數的新字符(串)。該函數有兩個參數。第一個參數為完整的字符串,第二個參數為指定個數。
參考實例:
var
S, A: String;
begin
S := ''MSN Messenger'';
A := RightStr(S, 3); // 從最右邊開始,獲取右邊的三個字符。因此A變量則等于ger。
end;
13.SetLength
功能說明:設置字符串或動態數組長度。該函數有兩個參數。第一個參數為要設置的字符串變量或動態數組變量,第二個參數為指定的長度,其取值范圍在0到255之間。
參考實例:
var
S: String;
arrText: array of Char; // 定義一個動態數組
begin
SetLength(S, 10); // 當設置后,S變量只能賦值長度為10的字符串。
SetLength(arrText, 10); // 只有使用SetLength為動態數組分配內存空間后才能使用動態數組。這句代碼的作用相當于arrText: array[0..9] of Char
end;
14.StrPCopy
功能說明:將字符串復制到字符數組中。該函數有兩個參數。第一個參數為“目標數組”,第二個參數為“字符串”。
參考實例:
var
arrChar: array[0..255] of Char; // 這里聲明了長度為256的Char型數組
begin
StrPCopy(arrChar, ''Come on, baby!'');
end;
15.Trim
功能說明:刪除字符串左右兩邊的空格(無論左右兩邊有多少個空格均被全部刪除)。
參考實例:
var
S: String;
begin
S := '' Delphi 7.0 '';
S := Trim(S);
end;
16.TrimLeft
功能說明:刪除字符串左邊的空格(無論左邊有多少個空格均被全部刪除)。
參考實例:
S := TrimLeft('' Delphi'');
17.TrimRight
功能說明:刪除字符串左邊的空格(無論左邊有多少個空格均被全部刪除)。
參考實例:
S := TrimRight(''Delphi '');
18.UpperCase
功能說明:將字符(串)中的英文字符轉換為大寫。
參考實例:
var
S, A: String;
begin
S := ''abc'';
A := UpperCase(S); // 經過UpperCase函數轉換后,A則等于ABC。
end;
三、文件、磁盤操作函數
軟件大多都要對文件、磁盤進行操作。熟悉掌握這些函數可以幫助你輕松實現創建、刪除、保存文件等功能。
1.Append
功能說明:追加內容到文件中。文件必須要存在。
參考實例:
var
S: String;
F: TextFile;
begin
S := ''This is a book.'';
AssignFile(F, ''C:\MyFile.txt''); // 將C:\MyFile.txt文件與F變量建立連接,后面可以使用F變量對文件進行操作。
Append(F); // 以追加的方式打開文件
Writeln(F, S); // 將S變量中的內容追加到文本尾后。
CloseFile(F); // 關閉文件
end;
2.AssignFile
功能說明:與指定的文件建立連接。
參考實例:
var
F: TextFile; // 聲明文本文件類型變量
begin
AssignFile(F, ''C:\MyFile.txt''); // 將C:\MyFile.txt文件與F變量建立連接,后面可以使用F變量對文件進行操作。
end;
3.ChDir
功能說明:改變當前目錄(文件夾)。
參考實例:
var
sDir: String;
begin
sDir := ''C:\Windows'';
ChDir(sDir); // 此時,系統的當前目錄則為C:\Windows目錄。
end;
4.CloseFile
功能說明:關閉文件。當對文件的操作完成后,應該使用CloseFile函數關閉打開的文件。
參考實例:
var
S: String;
AllText: String;
F: TextFile;
begin
AssignFile(F, ''C:\MyFile.txt''); // 將C:\MyFile.txt文件與F變量建立連接,后面可以使用F變量對文件進行操作。
Reset(F); // 打開文件
while not EOF(F) do begin // 使用While循環,一直判斷是否到了文件未尾
Readln(F, S); // 讀取一行文本
AllText := AllText + S;
end;
CloseFile(F); // 關閉文件
end;
5.DeleteFile
功能說明:刪除指定的文件。該函數只有一個參數。此參數為欲刪除文件的完整路徑。如果刪除成功,則返回True。若刪除失敗、或文件不存在則返回False。
參考實例:
var
IsOK: Boolean; // 用于保存刪除狀態
begin
IsOK := DeleteFile(''C:\My Documents\Index.html''); // 函數執著后,將結果返回給IsOK變量。如果IsOK變量為True,則表示文件刪除成功。
if IsOK then ShowMessage(''文件刪除成功!'')
else ShowMessage(''文件刪除失敗!'');
end;
6.DirectoryExists
功能說明:檢測指定的文件夾否存在。如果存在則返回True,反之則為False。
參考實例:
var
IsExists: Boolean;
begin
IsExists := DirectoryExists (''C:\Windows'');
if IsExists then ShowMessage(''Windows文件夾存在!'')
else ShowMessage(''Windows文件夾不存在!'');
end;
7.DiskFree
功能說明:獲取指定磁盤的剩余空間。該函數只有一個參數。該參數用于指定要獲取剩余空間的磁盤號。當參數為0時,表示獲取當前磁盤的剩余空間,1為A盤,2為B盤,以此類推。如果返回值為-1,表示指定的磁盤無效。
參考實例:
var
FreeSize: Int64;
begin
FreeSize := DiskFree(3); // 獲取C盤中的剩余空間。返回的值是以“字節”為單位的。
end;
8.DiskSize
功能說明:獲取指定磁盤的空間。該函數只有一個參數。該參數用于指定要獲取磁盤空間的磁盤號。當參數為0時,表示獲取當前磁盤的空間,1為A盤,2為B盤,以此類推。如果返回值為-1,表示指定的磁盤無效。
參考實例:
var
DiskSize: Int64;
begin
DiskSize:= DiskSize(3); // 獲取C盤的空間。返回的值是以“字節”為單位的。
end;
9.EOF
功能說明:判斷文件指針是否移動到了文件未尾。當EOF函數返回值為True時,則不可以使用Readln函數進行讀取文件了。
參考實例:
var
S: String;
AllText: String;
F: TextFile;
begin
AssignFile(F, ''C:\MyFile.txt''); // 將C:\MyFile.txt文件與F變量建立連接,后面可以使用F變量對文件進行操作。
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -