Delphi中的字眼

Delphi中的字眼(Tokens)

這一篇文章主要在介紹構成 Delphi 程式的最小單位--- 字眼(Token)。
什麼是字眼(Tokens)
在開始討論 "什麼是字眼?" 之前，讓我們先看底下這個簡短的程式。
program Project1;

uses
dialogs;

begin
Messagedlg('Hello',mtInformation,[mbOK],0) ;
end.

程式執行後會在畫面出現上一個小小的視窗，並顯示Hello的字樣。
在這裏先不說明這個程式是如何執行的，構成這個程式的英文字、數字、符號，才是我們要討論的重點---字眼。
我們可將字眼大致分類為特殊符號(special symbols)、識別字(inditifiers)、標籤(labels)、數字和字元字串。當然還可以再以功能方面再做細分, 底下將逐一介紹.
在 Object Pascal 中的分類
這裏的分類方法，主要依據Delphi手冊(Object Pascal Language Guide)中的分類，再加上一些範例及說明。
特殊符號
特殊符號:
+ - * / = > < ( ) [ ] { } , . : ; @ # $ ^
>= <= := .. (* *) (. .) //

有一些特殊符號具有相等的意義，如下表左右兩邊的符號表示相同的意思。
符號    對等的符號
[    (.
]    .)
{    (*
}    *)
雖然上表的符號有對等的關係，但是必需成對出現，否則在編譯時會產生錯誤。例如
{ } (* *) 正確 { *) 錯誤
另外還有一類就是空白(blanks)，這裏的空白泛指ASCII值從0..31的控制字元及空白字元(ASCII 32)。空白可放在字眼與字眼之間做為區隔，在編譯時，做為區隔用的空白字數至少有一個就可以了。不過一般在撰寫程式時通常都會多插入一些空白(空格或空行)，以增加美觀及方便閱讀。

識別字(identifiers)
識別字就是一個以英文字母，數字和底線(_，ASCII 95)所組合成的一個名字(不可以是數字開頭)，可以是一個有意義的英文單字，也可能是一個完全沒有意義，隨便兜出來的字母組合。

在Object Pascal中識別字是不區分大小寫的。雖然在撰寫程式的時候可以比較隨興的使用，但是設定變數時需注意，Count和count對編譯器來說是同一個字。
識別字中有兩種比較特別的類別，就是保留字(reserved word)和標準指令(standard directives)，在Delphi都是以粗體字顯示(預設值)。
這兩類都是Object Pascal定義好的指令，兩者的區別在保留字不可以重新定義，而標準指令可以，但是強烈的建議不要重新定義標準指令。
以下分別是保留字和標準指令的列表:
保留字:
and array as asm
begin case class const
constructor destructor div do
downto else end except
exports file finalization finally
for function goto if
implementation in inherited initialization
inline interface is label
library mod nil not
object of on or packed procedure program property raise record repeat set shl shr string then threadvar to try type unit until uses var while with xor

標準指令:
absolute abstract assembler automated
cdecl default dispid dynamic
export external far forward
index message name near
nodefault override pascal private
protected public published read
register resident stdcall stored
virtual write

除了上述的保留字和標準指令外，其他像是常數、變數、程序名稱、函數名稱、型態、單元名稱… 也都是一種識別字，必須遵守下列的限制。
O 識別字的長度不限，但是Delphi只認得前面63個位元組。
O 必需是以英文字母或底線(_，ASCII 95)開頭，其後可以是英文字母，數字或是底線。
O 不區分英文的大小寫。
O 當有幾個同名的識別字存在時，可能需要用句點(.，ASCII 46)來連結別一個識別字做為區分。例如 form1.caption，label1.caption。在這裏我們把這種用句點連結起來的識別字，稱為限定詞識別字(Qualified Identifier)。

標籤(labels)
標籤主要是和搭配goto使用的，標示goto要跳到那一個位置。標籤可以是一個識別字，或是0到9999間的一個數字串列(前置的0會被忽略)。宣告及使用的範例如下:
procedure test ;
label
OutHere, 0005 ;
begin
goto 5 ;
showmessage('不會執行到這一行') ;
goto OutHere ;

0005:
ShowMessage('會執行這一行') ;

OutHere:
end ;

標籤本身不會影響到程式的執行，只有當執行到goto才會轉移程式的流程。

數字
在Object Pascal中使用的數字系統，除了一般慣用的十進位數字之外，還可以使用工程表示法來表示一個實數，或是用16進位法來表示一個正整數。
O 十進位數字。又可分為整數和實數，表示法就是我們一般的慣用法，如 123，-1，3.14，-0.5 …諸如此類。
O 工程表示法。使用E來表示10的次方，例如7E-2 表示 7*10^(-2)，也就是 0.07。
O 16進位法。在開頭加上錢號($，ASCII 36)來表示一個16進位的正整數，例如 $FFFF 表示 65536。16進位可以表示的數字範圍從$00000000到 $FFFFFFFF。

字元字串
一串以單引號('，ASCII 39)包夾住的字元，我們稱之為字元字串。下面是一些例子:
'123'            { 123              }
'Pascal'        { Pascal              }
'中文'        { 中文              }
''            { (空字串)          }
' '            { (一個空白字元)    }
除了這種最簡單的應用外，還有一些特性及應用方法，列舉如下:
O 在字串中，可以用連續兩個單引號來表示單引號字元。例如:
'I''m fine'        { I'm fine }
O 字元字串的長度即為表示這個字串是由幾個ASCII字元所構成(在 Delphi 16位元版本中, 字元字串的最大長度為255)。注意，一個中文字是由兩個 ASCII字元所構成的。
O 當字元字串的長度為1的時候與字元型態(char)相容。
O 可以利用#字號加上一個數字(0..255)來表示對應的ASCII字元。通常我們用這種方式可以在字串中加上一些控制字元。在#號和數字的前後都不可以有空白。

正確的用法:
'第一行'#13'第二行'     { 第一行(換行)第二行     }
#65#66#67     { ABC                 }

錯誤的用法:
'第一行' #13 '第二行'     { 在 # 前有空格, 錯誤     }
# 65                         { # 和數字間有空格, 錯誤    }

O 當編譯選項 Extended Syntax 打開時{$X+}，字元字串可相容於PChar格式。

註釋
在程式之中，有一些是要寫給人看，幫住記憶或是說明程式的字句，為了要把這些字句和真正的程式分開，在 Object Pascal 中定義了幾種符號，把給編譯器看的程式和讓人看的註釋分隔開來。
O 對稱的大括號 { }
{ 像這樣在被夾在左、右大括號之間的文字都是註解 }
{
左右大括號不一定要在同一行，但不可有巢狀的註解。
注意: 有些中文字的第二個字元是右大括號，會造成編譯時的
錯誤。
}

在Delphi 2.01 中文應用組件及Delphi 3.0中已解決這個問題。
O 對稱的小括號加上星號 (* *)
(*
使用方法同對稱的大括號，不過因為是用兩個碼，所以不會出現與中文相衝的狀況。
*)
O 連續兩個除號 //
// 表示從兩個除號之後到行尾都是註解(單行有效)。
// 這種註解方式只有在Delphi 2.0 之後才可使用。

在Object Pascal中，編譯器指令(compiler directives)是一種特殊的註解，詳細的說明可參考 IFDEF.DOC。