prss.net
当前位置:首页 >> DElphi 动态创建窗口 >>

DElphi 动态创建窗口

procedure TForm1.Button1Click(Sender: TObject); Var MyForm:TForm; begin MyForm:=TForm.Create(self); MyForm.Parent:=self; MyForm.Show; //把myform.showmodal改为myform.show end;

可以的,先声明一个变量,再create,然后设置其parent和postion,最后show出来就行了。 要注意的是: 1、控件必须要有parent 2、控件最好指定位置和大小信息 3、控件要显示出来,必须要调用show方法。

新建了两个窗体form1和form2,在Project->Options里面将form2设置为Available forms,在form1中添加一个button1,运行如下代码: Uses Unit2; //引用单元文件 procedure TForm1.Button1Click(Sender: TObject); begin form2:=TForm2.Create(Appli...

在Unit1中Uses Unit2, 在Unit2的implementation下面Uses Unit1, 这样两个窗口就可以相互调用了。 在Unit1里面声明一个访问数据库的方法, 在Unit2中就可以直接使用了。

delphi 的 *.dfm 文件,是 delphi 工程中定义描述窗体组成及属性设置的文件,早期版本是二进制,现在基本上 dfm 文件中的内容都是文本格式保存,类似以下: 通常,这个文件是 delphi 自动生成,与相对应的 pas 文件想配套使用,一般情况下不要手...

是的,form.free about:TForm1;begin about TForm1.Create(self); try about.ShowModal; finally about.Free; end;end;如果是about.show;請:procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);begin Action caFree;end; ...

先声明一个变量,再create,然后设置其parent和postion,最后show出来就行了。 要注意的是: 1、控件必须要有parent 2、控件最好指定位置和大小信息 3、控件要显示出来,必须要调用show方法。

是改变窗口标题吗?form1.caption:=‘QQ’;就可以实现啊,你自己创建的还是包含这个caption属性吧!

从代码看,少了一句给 WebBrowser 指定显示的容器(窗体或面板的 句柄): procedure TForm1.Button1Click(Sender: TObject);var wb:Twebbrowser;begin wb:=Twebbrowser.Create(self); wb.ParentWindow := Handle; //新增 wb.Left:=208; wb.Top:...

这种动态生成的控件 是需要特殊的方式去读取的 显示查找对应的控制HANDEL 然后转换成对应的控件类型 才能有对应的操作

网站首页 | 网站地图
All rights reserved Powered by www.prss.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com