我看到一篇文章,用来实现子窗体:
procedure TMainForm.New1Click(sender:TObject);
var
chlidForm:TChildForm;
begin
childForm:=TChildForm.Create(Self);
childForm.Show;
end;但系统报TChildForm不存在。我用的是delphi6.0。如果我已经定义了form2,form2中包含部件与代码。
我可否如下定义:
childForm:=TChildform.create(form2);
procedure TMainForm.New1Click(sender:TObject);
var
chlidForm:TChildForm;
begin
childForm:=TChildForm.Create(Self);
childForm.Show;
end;但系统报TChildForm不存在。我用的是delphi6.0。如果我已经定义了form2,form2中包含部件与代码。
我可否如下定义:
childForm:=TChildform.create(form2);
解决方案 »
- ScanLine函数如何使用?求示范
- 说句实在话 现在是不是delphi不行了 ?
- 如何动态改变ActiveForm的GUID
- 大家来评评理,发泄一下吧,来者有分!
- 一个动人的爱情故事!!!!!!!!!!!!!!!!
- 如何根据字体来确定label的长度?(100分)
- 高分求收发E-mail的原理与源程序!!!
- 请问哪里有odac下载?(不是试用版的)
- 如何把象姓名和密码之类的信息写入注册表,然后在需要时取出来。
- 求救!!如何在WEB页中传递参数给ACTIVEFORM??
- 如何实现在memo实现文字行自上而下的功能。
- 在delphi中怎样展开bom表,不用sql 后台procedure!,只用adoquery ,自定yi function() ,temp table 急急急!谢谢!
chlidForm:TForm2;//TForm2是chlidForm对应的类名
begin
childForm:=TForm2.Create(Self);
childForm.Show;
直接选不就可以了
MDI很简单啊。子窗口动态创建。主窗口formStyle :=mdiform,子窗口formStyle :=MDIChild就行了。
procedure TForm1.FlatSpeedButton1Click(Sender: TObject);
begin
Application.CreateForm(TForm2, Form2);
//Application.CreateForm(TForm3, Form3);
form2.Height:=600;
form2.show;//窗体名:=T窗体名.create(self);
//窗体名.showmodal;
end;