高分请教:枚举类型的值如何转换成字符串类型?? 谢谢比如:type ta=(r,t,y,c,n,m);var test:ta;ta=r;showmessage(ta) '在这里要显示ta的值! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);var test:TA;begin test := r; showMessage(TypInfo.GetEnumName(TypeInfo(TA),Integer(test)));end; MD5加密 在image中加入一个图片但是运行的时候显示不出来,为什么? fastreport里如何用代码来实现改变默认的打印机? 避免重复打开MDI子窗口的问题 为什么我打印出来的图片远远小于图片实际的大小!! 解决了立即给分! 应该是简单问题,100分相赠 我刚刚开始学软件开发,各位大虾给个建议,请指教 100分 :CreateProcess调用dos程序的问题 我想做出类似WINDOWS优化大师这样框架的界面,应该怎么做? 高手来帮忙啊,怎么能用Delphi实现Win2000的文件收索功能 关于FORM生成的问题
var test:TA;
begin
test := r;
showMessage(TypInfo.GetEnumName(TypeInfo(TA),Integer(test)));
end;