博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2013年12月30日

摘要: type PVarRec = ^TVarRec TVarRec = record case Byte of vtInteger :(VInteger: Integer; VType: Byte); vtBoolean :(VBoolean: Boolean); vtChar :(VChar: Char); vtExtended :(VExtended: PExtended); vtString :(VString: PShortString); vtPointer :(VPointer: Pointer); vtPChar :(VPChar: PChar); vtObject :(VObjec 阅读全文

posted @ 2013-12-30 12:13 豪杰的爸爸 阅读(214) 评论(0) 推荐(0) 编辑