如何实现eval?

[episome]

我有一个Timage 为 c1
一字符型变量 s 为 “c”
一整型变量 i 为 1

如何转换 s + intToStr(i) 为c1 ？

就是类似于其他语言中的 eval()
??

[episome]

delphi 不可以么

[episome]

来个人随便发点什么吧。不好揭帖

[Frank.WU]

.canvas.textout(x,y,string);

[lextm]

一字符型变量 s 为 “c”
一整型变量 i 为 1

把s改成'c%d'。
c1 ：＝ Format（s, i）;