如何在一个窗体中嵌入另一个窗体
2008-04-01 08:33
411 查看
Form1
uses unit2;
procedure TForm1.FormCreate(Sender: TObject);
begin
form2 := TForm2.Create(Panel,self);
form2.BorderStyle := bsNone;
form2.WindowState := wsMaximized;
form2.Parent := Panel;
form2.Show;
end;
Form2
uses Unit1;
private
FOwnerForm : TForm;
end;
constructor Create(AOwner: TComponent; OwnerForm: TForm ); reintroduce;//响应父窗体事件的关键
constructor TForm2.Create(AOwner: TComponent; OwnerForm: TForm);
begin
inherited Create(Aowner);
FOwnerForm := OwnerForm;
end;
事件触发(在FORM2中来响应FORM1的事件)
procedure TForm2.Button1Click(Sender: TObject);
begin
if Self.FOwnerForm.ClassType = TForm1 then
begin
ShowMessage('按下我了!');
end;
end;
uses unit2;
procedure TForm1.FormCreate(Sender: TObject);
begin
form2 := TForm2.Create(Panel,self);
form2.BorderStyle := bsNone;
form2.WindowState := wsMaximized;
form2.Parent := Panel;
form2.Show;
end;
Form2
uses Unit1;
private
FOwnerForm : TForm;
end;
constructor Create(AOwner: TComponent; OwnerForm: TForm ); reintroduce;//响应父窗体事件的关键
constructor TForm2.Create(AOwner: TComponent; OwnerForm: TForm);
begin
inherited Create(Aowner);
FOwnerForm := OwnerForm;
end;
事件触发(在FORM2中来响应FORM1的事件)
procedure TForm2.Button1Click(Sender: TObject);
begin
if Self.FOwnerForm.ClassType = TForm1 then
begin
ShowMessage('按下我了!');
end;
end;
相关文章推荐
- 如何在一个窗体中嵌入另一个窗体。
- 如何在一个窗体中嵌入另一个窗体
- 如何在一个窗体中加载另一个窗体上的控件?
- 如何在一个iframe中给父窗体的另一个iframe中的div设值
- C# winform中一个类中如何调用另一个窗体的控件或方法
- 请问FMX手机app多个窗体如何嵌入同一个窗体?
- C#.NET常见问题(FAQ)-程序如何把窗体文件从从一个项目中复制到另一个项目
- C#.NET常见问题(FAQ)-程序如何把窗体文件从从一个项目中复制到另一个项目
- 关于MFC将一个窗体嵌入另一个窗体的方法
- 如何使一个窗体被另一个窗体嵌套?
- 由一个页面传参数到另一个模式窗体,如何接受值
- C#程序如何把窗体文件从从一个项目中复制到另一个项目
- C# winform中一个类中如何调用另一个窗体的控件或方法
- 如何在一个窗体中调用另一个窗体的控件或方法
- 如何在一个窗体中调用另一个窗体的控件或方法
- (转) c#中如何设计一个窗体关闭,另一个窗体打开?
- C# winform中一个类中如何调用另一个窗体的控件或方法
- c#如何用一个程序打开另一个程序(如:窗体的注销重启)
- 如何从一个窗体拖拽一个按钮到另一个窗体
- (转) c#中如何设计一个窗体关闭,另一个窗体打开?