2009年12月22日

GetEnumName和GetEnumValue

摘要： 利用TypInfo单元的GetEnumName和GetEnumValue可以遍历任意枚举类型，并获取其名称和值。下面是示例Demo。 procedure TForm1.btnTestClick(Sender: TObject);var p: PTypeData; i: Integer; s: String; pt: PTypeInfo;begin ListBox1.Items.Clear; pt... 阅读全文

posted @ 2009-12-22 22:54 舟山牙医 阅读(1729) 评论(0) 推荐(0)

Delphi命名及不命名的类型type类型大全（各种数据类型）

摘要： Delphi命名及不命名的类型type类型大全（各种数据类型） 1.枚舉類型: type DayOfWeek=(Sunday,Monday,Tuesday,Wednesday,Thursday,Friday,Saturday);//變量名=(枚舉列表) 引用此枚舉類型: var Days:DayOfWeek; 也可以直接將類型聲明和變量聲明一起: var Days:(Sunday,Monday... 阅读全文

posted @ 2009-12-22 22:39 舟山牙医 阅读(1022) 评论(0) 推荐(0)

导航