GetEnumName函数如何使用?
解决方案 »
- 如何在去掉打开的ie工具栏(地址栏等)、状态栏?谢谢。
- 摄像头问题,如何屏蔽掉 "视频源" 对话筐?
- 求一正则表达式
- 各位大哥大姐,小弟有事相求,急急急!!!!十万火急!!!
- 如何用Socket或UDP实现互联网的通信,类似于QQ或MSN?
- 统一结构化存储OLE Structured Storage)的全文检索问题!!!
- 夏天火气大,散点分!呵呵
- 我的combobox是dropdownlist类型的,能不能在窗体打开时显示 text
- ★★如何通过现成的Excel Sheet复制Sheet★
- DBNavigator组件在使用post时为什么按两次就会报错有什么方法不让它报错吗
- 关于BussinessSkinForm 的问题
- 非常感谢Corn1(玉米)给我的ACM控件,请玉米来接分
我这句有没错误
怎么老提示有错啊?
begin
i:=ord(Red);
label1.Caption:='枚举值: '+GetEnumName(TypeInfo(TMyColor),i);
label1.Caption:='序 号: '+IntToStr(GetEnumValue(TypeInfo(TMyColor),GetEnumName(TypeInfo(TMyColor),i)));
end;
那为什么运行不了了?