3.4.3 枚舉類型
枚舉類型的名字必須有意義並且類型的名字之前要加前綴‘T’。枚舉類型的內容的名字必須包含枚舉類型名稱的簡寫,例如:
TSongType = (stRock, stClassical, stCountry, stAlternative, stHeavyMetal, stRB);
3.4.4 數組類型
數組類型的名字必須有意義並且類型的名字之前要加前綴‘T’。如果聲明一個指向數組類型的指針必須在該類型的名字之前加前綴‘P’,例如:
type
PCycleArray = ^TCycleArray;
TCycleArray = array[1..100] of integer;
3.4.5記錄類型
記錄類型的名字必須有意義並且類型的名字之前要加前綴‘T’。如果聲明一個指向數組類型的指針必須在該類型的名字之前加前綴‘P’,例如:
type
PEmployee = ^TEmployee;
TEmployee = record
EmployeeName: string
EmployeeRate: Double;
end;
3.5 類
3.5.1 命名及格式
類的名字必須有意義並且類型的名字之前要加前綴‘T’。例如:
type
TCustomer = class(TObject)
類實例的名字通常是去掉‘T’的類的名字。例如:
var
Customer: TCustomer;
3.5.2 類中的變量
3.5.2.1命名及格式
類的名字必須有意義並且類型的名字之前要加前綴‘F’。所有的變量必須是四有的。如果需要從外部訪問此變量則需要聲明一屬性
3.5.3 方法
3.5.3.1命名及格式
同函數和過程的命名及格式。
3.5.3.2 屬性訪問方法
所有的屬性訪問方法必須出現在private 或 protected 中。屬性訪問方法的命名同函數和過程的命名另外讀方法(reader method)必須使用前綴‘Get’. 寫方法(writer method)必須使用前綴‘Set’。寫方法的參數必須命名為‘Value’,其類型同所要寫的屬性相一致。例如:
TSomeClass = class(TObject)
private
FSomeField: Integer;
protected
function GetSomeField: Integer;
procedure SetSomeField( Value: Integer);
public
property SomeField: Integer read GetSomeField write SetSomeField;
end;