怎么才能在窗体上动态生成控件?

kinglion 2001-04-29 05:28:00
近期,小弟在编写程序的过程中有个地方需要在窗体上动态生成控件,但是我是个新手,不知道该怎么办.我在程序里声名一些控件类,但是他们不能在窗体上显示,难道说要动态生成控件好要卸载窗体后在重新生成一个窗体,在其中加入吗?请高手指点!
...全文
101 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
lt30 2001-04-30
  • 打赏
  • 举报
回复
var
b : TButton;
begin
try
b:=tbutton.create(self);
b.parent:=form1; //很重要
b.left:=...;
b.top:=...;
b.onclick:=...;
b.name:=...;
b.show;
finally
b.free;
end;



end;
manboo 2001-04-30
  • 打赏
  • 举报
回复
上面的同志都是对的!
hzjf 2001-04-30
  • 打赏
  • 举报
回复
我认为海风与rh两位老兄的回答最简单、明了!(其他老大别打我哦,怕怕!)
sanjianxia 2001-04-30
  • 打赏
  • 举报
回复
利代码编程,类与对象的关系。
ft 2001-04-29
  • 打赏
  • 举报
回复
var
btn:TButton;
begin
btn:=TButton.Create(Seft);
btn.parent:=Form1;
btn.width:=..
btn.height:=..
btn.show;
Apollo47 2001-04-29
  • 打赏
  • 举报
回复
不好意思 btn:=Tbutton(self) 应写成 btn:=Tbutton.Create(self) ;

Apollo47 2001-04-29
  • 打赏
  • 举报
回复
var btn:TButton;
begin
btn:=Tbutton(self);
btn.left:=....
//这里设置一些别的属性;
Btn.parent:=Form1;
end;


clacklin 2001-04-29
  • 打赏
  • 举报
回复
xxx.parent:=form1
rh 2001-04-29
  • 打赏
  • 举报
回复
设置控件的父属性为窗体才可以显示!!

5,392

社区成员

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

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