導語：計算機畢業論文:Delphi一文來源于網友上傳，不代表本站觀點，若需要原創文章可咨詢客服老師，歡迎參考。

delphi

函數由一句或多句代碼組成，可以實現某個特定的功能。使用函數可以使代碼更加易讀、易懂，加快編程速度及減少重復代碼。過程與函數類似，過程與函數最重要的區別在于，過程沒有返回值，而函數能有返回值。

在Delphi7.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:=''''ILoveChina!'''';

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

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

end;

執行結果，MyStr等于“Love”，“Love”字符串在“ILoveChina!”中第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變量等于BorlandDelphi7.0。

end;

3.Delete

功能說明：刪除字符串中指定的字符串。該函數有三個參數。第一個參數為要進行處理的字符串，第二個參數為從何處開始刪除，第三個參數為刪除的字符個數。

參考實例：

var

S:String;

begin

S:=''''ILikeReadingCPCW.'''';

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

Delete(S,16,1);

end;

此時S變量則是ILikeReadingPCW.(“C”已經不存在了)。

4.High

功能說明：返回數組下標的最大值。

參考實例：

var

arrText:array[0..9]ofChar;

i:Integer;

begin

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

end;

5.Insert

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

參考實例：

var

S:String;

begin

S:=''''Watisyourname?'''';

//上面句子中的What單詞查一個“h”字符，下面使用Insert函數將h添加進去。

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

end;

6.LeftStr(所在單元：StrUtils)

功能說明：返回字符串左邊指定個數的新字符(串)。該函數有兩個參數。第一個參數為完整的字符串，第二個參數為指定個數。

參考實例：

var

S,A:String;

begin

S:=''''MSNMessenger'''';

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]ofChar;

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'''',''''ILikeReading!'''');

end;

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

注意：Pos函數在查找時是要區分字符大小的。如果要實現不區分大小，那么需要使用UpperCase或LowerCase函數將兩個參數的字符(串)轉換為“大寫”或“小寫”再進行查找。

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

12.RightStr(所在單元：StrUtils)

功能說明：返回字符串右邊指定個數的新字符(串)。該函數有兩個參數。第一個參數為完整的字符串，第二個參數為指定個數。

參考實例：

var

S,A:String;

begin

S:=''''MSNMessenger'''';

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

end;

13.SetLength

功能說明：設置字符串或動態數組長度。該函數有兩個參數。第一個參數為要設置的字符串變量或動態數組變量，第二個參數為指定的長度，其取值范圍在0到255之間。

參考實例：

var

S:String;

arrText:arrayofChar;//定義一個動態數組

begin

SetLength(S,10);//當設置后，S變量只能賦值長度為10的字符串。

SetLength(arrText,10);//只有使用SetLength為動態數組分配內存空間后才能使用動態數組。這句代碼的作用相當于arrText:array[0..9]ofChar

end;

14.StrPCopy

功能說明：將字符串復制到字符數組中。該函數有兩個參數。第一個參數為“目標數組”，第二個參數為“字符串”。

參考實例：

var

arrChar:array[0..255]ofChar;//這里聲明了長度為256的Char型數組

begin

StrPCopy(arrChar,''''Comeon,baby!'''');

end;

15.Trim

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

參考實例：

var

S:String;

begin

S:=''''Delphi7.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;