读书人

Midi窗体怎么显示在指定的panel当中

发布时间: 2012-02-17 17:50:42 作者: rapoo

Midi窗体如何显示在指定的panel当中?
如题:
Form2.Parent := Tform1.panel1
编译出错:Method identifier expected

[解决办法]
procedure Tfm_Main.FormOpenShow(TClass: TComponentClass;var Reference);
begin
if assigned(TForm(Reference)) then
begin
TForm(Reference).Close;
TForm(Reference).free;
end;
application.CreateForm(TClass,TForm(Reference));
TForm(Reference).Dock(Panel1,Panel1.ClientRect); //把窗体 放在panel上
TForm(Reference).Show;
end;

procedure Tfm_Main.cxButton10Click(Sender: TObject);
begin
FormOpenShow(TForm1,Form1);
end;

读书人网 >.NET

热点推荐