Delphi 各種功能函數總結

1. 自增函數 Inc

原型：procedure Inc(var X);，位於 System 單元。

功能：第一種用法，就是本身加一。

var
  i: Integer;
begin
  i:= 100;
  Inc(i);  //這裏，i的值就成了 101
end;
複製代碼

原型：procedure Inc(var X; N: Longint);，位於 System 單元。

功能：第二種用法，就是加上一個指定的值。

var
  i: Integer;
begin
  i:= 100;
  Inc(i, 100);  //這裏，i的值就成了 200
end;
複製代碼

2. 自減函數 Dec

原型：procedure Dec(var X);，位於 System 單元。

功能：第一種用法，就是本身減一。

var
  i: Integer;
begin
  i:= 100;
  Dec(i);  //這裏，i的值就成了 99
end;
複製代碼

原型：procedure Dec(var X; N: Longint);，位於 System 單元。

功能：第二種用法，就是減去一個指定的值。

var
  i: Integer;
begin
  i:= 100;
  Inc(i, 30);  //這裏，i的值就成了 70
end;
複製代碼

3. 返回所佔字節數 SizeOf

原型：function SizeOf(X): Integer;，位於 System 單元。

功能：它能夠返回一個變量、或類型所佔的字節數。

var
  i, n: Integer;
  s: string;
begin
  i:= 10;
  n:= SizeOf(i);  //這裏，n的值爲 4

  s:= 'Hello Delphi';
  n:= SizeOf(s);  //這裏，n的值爲4，這裏有疑問，字符串無論長度多少，都返回 4

  n:= SizeOf(Integer);  //這裏，n的值爲 4
  n:= SizeOf(Double);   //這裏，n的值爲 8
  n:= SizeOf(String);   //這裏，n的值爲 4
end;
複製代碼

4. 返回元素的個數 Length

原型：function Length(S): Integer;，位於 System 單元。

功能：它能夠返回字符串中的字符個數、或數組中的元素個數。

var
  s: string;
  arr: array [0..5] of Integer;
  i, n: Integer;
begin
  s:= '123456789';
  n:= Length(s);  //這裏，n的值爲 9

  for i:= 0 to 5 do
  begin
    arr[i]:= i;
  end;
  n:= Length(arr);  //這裏，n的值爲 6
end;
複製代碼

5. 給連續的字節賦指定的值 FillChar

原型：procedure FillChar(var X; Count: Integer; Value: Byte);，位於 System 單元。

功能：它能夠給一組連續的字節賦予相同的指定值，一般用來給變量賦初值。

var
  arr: array [0..5] of Byte;
begin
  //數組除了能夠用for循環單個元素依次初始化，也能夠用FillChar所有初始化爲一樣的值
  FillChar(arr, SizeOf(arr), 1);  //表示給變量arr，從起始地址開始的連續6個字節，都賦值爲1
end;
複製代碼

6. 整型轉字符串 IntToStr

原型：位於 SysUtils 單元

① function IntToStr(Value: Integer): string; overload;

② function IntToStr(Value: Int64): string; overload;

功能：將一個整型數，以字符串形式返回。

補充：Integer 表示有符號32位整數，Int64 表示有符號64位整數。

var
  s: string;
begin
  s:= IntToStr(100);   //這裏，s的值爲 100
  s:= IntToStr(-100);  //這裏，s的值爲 -100
  s:= IntToStr($100);  //這裏，s的值爲 256
  s:= IntToStr(-$100); //這裏，s的值爲 -256
end;
複製代碼

7. 整型轉十六進制字符串 IntToHex

原型：位於 SysUtils 單元

① function IntToHex(Value: Integer; Digits: Integer): string; overload;

② function IntToHex(Value: Int64; Digits: Integer): string; overload;

功能：將一個整型數轉成十六進制數，以字符串形式返回，Digits 表示字符串長度，位數不足前面補零。

補充：Integer 表示有符號32位整數，Int64 表示有符號64位整數。

var
  s: string;
begin
  s:= IntToHex(100, 1);  //十進制轉十六進制，這裏s的值爲 64
  s:= IntToHex(100, 2);  //十進制轉十六進制，這裏s的值爲 64
  s:= IntToHex(100, 4);  //十進制轉十六進制，這裏s的值爲 0064
  
  s:= IntToHex(-100, 1);  //十進制轉十六進制，這裏s的值爲 FFFFFF9C
  s:= IntToHex(-100, 10); //十進制轉十六進制，這裏s的值爲 00FFFFFF9C
  
  s:= IntToHex($100, 1);  //十六進制轉十六進制，這裏s的值爲 100
  s:= IntToHex($100, 2);  //十六進制轉十六進制，這裏s的值爲 100
  s:= IntToHex($100, 4);  //十六進制轉十六進制，這裏s的值爲 0100
  
  s:= IntToHex(-$100, 1);   //十六進制轉十六進制，這裏s的值爲 FFFFFF00
  s:= IntToHex(-$100, 10);  //十六進制轉十六進制，這裏s的值爲 00FFFFFF00
end;
複製代碼