如Type Trec=(姓名,性别...)
解决方案 »
- Delphi 模拟DBNavigation的前4个按钮
- 我用Tmediaplayer想在Tpanel控件中播放影片,但却只能显示影片中的一部分图像,要显示影片中全部图像,怎么做??
- 请教,怎样给MDIForm的菜单栏更改颜色?
- 把StringGrid 控件中单元格的值 设置为可以修改 用什么属性??
- TQuery.Prepare 和 TUpdateSQL 的弊端
- 小问题:删除文件函数,卸载窗体函数是什么啊,告诉一下,我没找到。
- 请问如何统计报表中的记录数(共有多少条)?
- 如何在Delphi中调用VC编写的Dll的函数?
- 还是有关spcomm使用的问题,如何对Receive事件的buffer参数进行接受呢?
- 拨号问题
- ListView一般性问题,SubItem问题
- 区别nil,self,owner?
必须以字母开头!!.
type
TRec = (tr姓名, tr性别, ...); // 无法通过编译!!!所以当前只能使用英文字符。
type
Trec = (rName, rSex, rAge);
const
StrTrec: array [Trec] of string
= ('姓名', '性别', '年龄');
引用可以这样:
var
a: Trec;
begin
a := rName;
ShowMessage(StrTrec[a]);
end;