用这种形式
my = record
case integer of
1: ( x: char);
2: ( u1: smallint;
u2: smallint);
end;具体的你自己看吧
my = record
case integer of
1: ( x: char);
2: ( u1: smallint;
u2: smallint);
end;具体的你自己看吧
解决方案 »
- select * from 结果到excel表中,但是select 列却不行
- 在处理图象的编程中dircetShow方法和dspack方法是什么关系?是前者从属于后者吗?
- 对record中case疑惑
- ToolBar中的Button
- dbgrid怎么样将某一列的值删除,然后根据原来这列的值写入新的内容?
- 两个问题:DLL和焦点
- 请问:设计一个函数,输入日期字符串参数和天数(正表示该日期往后的天数,负表示往前天数),输出计算后的日期
- 请问如何实现对TDBMemo部件中显示的文本信息不能够进行剪切、拷贝和粘贴操作?
- com+事务处理问题
- 使用socketconnection进行连接,可不知为什么连不起来,但只要拔号一连上,却可以了,这是为什么?
- 在table的filter的设置里不能用变量吗?
- 格式与扩展名的问题!!!!!请回答!!!!
TVariantRecord = Record
Fieldvar: TField;
Case integer of
0:(D: Double);
1:(I: Integer);
2:(C: Char);
end;