record型別是一種結構體,就是記錄型別,需要用Type...End方式來定義,就像我們的資料表中的一條記錄有很多列一樣,先定義好每一列的屬性,訪問時就可以直接用 來表示了。
比如定義一個公司記錄結構,公司需要有名稱、英文名稱、地址、電話等資訊
//定義公司資訊結構CompanyInfo
Type CompanyInfo=record
Name:String;//名稱
EName:String;//英文名稱
Address:String;//地址
EAddress:String;//英文地址
Manager:String;//管理員
Phone:String;//電話
Fax:String;//傳真
Tel:String;//手機
End;
//使用時定義一下變數
Var
MyCompany:CompanyInfo;
//這時就可以直接給它賦值了
MyCompany.Name:="XX公司"
MyCompany.Tel:="1890000000"
..............
record型別是一種結構體,就是記錄型別,需要用Type...End方式來定義,就像我們的資料表中的一條記錄有很多列一樣,先定義好每一列的屬性,訪問時就可以直接用 來表示了。
比如定義一個公司記錄結構,公司需要有名稱、英文名稱、地址、電話等資訊
//定義公司資訊結構CompanyInfo
Type CompanyInfo=record
Name:String;//名稱
EName:String;//英文名稱
Address:String;//地址
EAddress:String;//英文地址
Manager:String;//管理員
Phone:String;//電話
Fax:String;//傳真
Tel:String;//手機
End;
//使用時定義一下變數
Var
MyCompany:CompanyInfo;
//這時就可以直接給它賦值了
MyCompany.Name:="XX公司"
MyCompany.Tel:="1890000000"
..............