高校问答dwcc2014汉化包:delphi怎么随机选控件
来源：百度文库 编辑：高校问答 时间：2024/04/29 13:31:07
如果窗体上有3个编辑框，
用random随机生成1到3个数字
然后给编辑框
如果随机数是1，那么就是edit1输出，
如果随机数是3，就让edit3输出
这是我的目地
我是想知道edit后面的那个字要用什么方法赋值给它？？
谢谢，可以了。。。
那样赋值是可以，
不过，第二种方法，无法改控件的属性啊（第一种可以）
比如，edit1.text：＝'abc';
要怎么写
用random随机生成1到3个数字
然后给编辑框
如果随机数是1，那么就是edit1输出，
如果随机数是3，就让edit3输出
这是我的目地
我是想知道edit后面的那个字要用什么方法赋值给它？？
谢谢，可以了。。。
那样赋值是可以，
不过，第二种方法，无法改控件的属性啊（第一种可以）
比如，edit1.text：＝'abc';
要怎么写
var
R:Integer;
begin
R:=Random(3)+1;
TEdit(FindComponent('edit'+IntToStr(R))).Text:=inttoStr(R);
end;
用findcomponent函数即可
直接赋值给字符串就行了，系统会自动转义
如果你还不明白，我写得更简单一点
var
EditName:string;
...
begin
....
EditName:='edit'+IntToStr(R);
end;
就这样赋值即可
要改成ABC就更简单了呀
用TEdit(Findcomponent(...))找到后，
直接设置其text属性就行了
比如说
TEdit(FindComponent('edit1')).Text:='abc';
你不会是要改控件的名称吧？
被你搞糊途了。。。
QQ上跟你说
123909566