如何的控件动态生成控件名称是变量的控件?

ygb321 2004-08-11 03:55:57
如何的控件动态生成控件名称是变量的控件,比如TEDIT,但名称是一变量
...全文
122 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
fslqh 2005-04-11
  • 打赏
  • 举报
回复
a:='Edit1';
TEdit(FindComponent(a)).Text:='控件名称是变量';

我试过,无问题。
何鲁青 2005-04-11
  • 打赏
  • 举报
回复
TEDIT是控件的名字啊,还是它的类型名字
如果是名字
/// fslqh(秋) ( ) 信誉:100 2005-4-11 0:00:49 得分: 0
a:='Edit1';
TEdit(FindComponent(a)).Text:='控件名称是变量';
如果是类型
/// ygb321(学习) ( ) 信誉:97 2004-8-11 16:38:18 得分: 0
TEdit.create(self).Name:='wewqewq'
搞定







jiawei6682 2005-04-11
  • 打赏
  • 举报
回复
fslqh(秋)说的对的
pengxuan 2005-04-11
  • 打赏
  • 举报
回复
var s:string;
tmpedit:TEdit;
s:='edit1';
tmpedit:=TEdit.Create(Self);
tmpedit.parent:=self;
tmpedit.width:=30;
tmpedit.height:=20;
tmpedit.name=s;
chenylin 2005-04-11
  • 打赏
  • 举报
回复
procedure TForm1.Button1Click(Sender: TObject);
Var
AAA:TEdit;
begin
AAA:=TEdit.Create(self);
AAA.Parent:=SELF;
AAA.Width:=30;
AAA.Height:=20;
AAA.Text:='1234';
...
...
AAA.Free;
end;
ygb321 2004-08-11
  • 打赏
  • 举报
回复
TEdit.create(self).Name:='wewqewq'
搞定
goodloop 2004-08-11
  • 打赏
  • 举报
回复
是控件数组么?
boatzm 2004-08-11
  • 打赏
  • 举报
回复
没有太明白,

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧