delphi7 仅知道窗体的名称,如何动态创建以个按钮以后,再用动态创建的按钮把窗体打开?

2024-11-06 17:36:48
推荐回答(3个)
回答(1):

应该可以。
窗体名称是指窗体类的类名称,还是窗体类生成的对象名称?
如果是前者,需要在按钮事件下,动态创建该窗体类的对象。
如果是后者,只需在之前隐藏该窗体,然后在按钮事件下显示出该窗体即可。
(不知道你为什么会有这样一个需求。。。)

回答(2):

假设你的窗体form1 在form2上动态创建button
先要在form2添加一个按钮事件
procedure Buttonclick(Sender: TObject);
begin
form1.show
end
然后创建Button给OnClick赋值就行
button1:= TButton.Create(Self);
button1.OnClick = ButtonClick;

回答(3):

你可以动态创建,例在Form1窗体里动态创建铵钮:
var
button:tbutton;
begin
button:=tbutton.create(self);
button.text:=
button.left
button.top.....
button.parater:=form1;
end;