摘要：
1 MAttribute = class(TCustomAttribute) 2 private 3 FName: string; 4 public 5 constructor Create(AName: string); 6 end; 7 TMyClass = class 8 private 9 FProp2: Integer;10 FProp1: string;11 procedure SetProp1(const Value: string);12 procedure SetProp2(const Value: Int... 阅读全文
posted @ 2014-03-26 23:15 对镜弹箜篌 阅读(356) 评论(0) 推荐(0) 编辑