delphi MDI窗口怎么创建
我创建窗口时出了错误！排版为如下：4个panel，在右下角也就是fctpanel中显示form1代码如下USESunit1;procedureTmainform.Form...
我创建窗口时出了错误！排版为如下：4个panel，在右下角也就是fctpanel中显示form1
代码如下
USES unit1;
procedure Tmainform.FormCreate(Sender: TObject);
var f:Tform1;
begin
try
f:=form1.Create(fctpanel);
f.BorderStyle:=bsnone;
f.Align:=alclient;
f.ParentWindow:=fctpanel.Handle;
f.Show;
except
end;
end;
不知道哪里错了，反正每次提示加粗那句出错，谁帮帮忙啊 展开
代码如下
USES unit1;
procedure Tmainform.FormCreate(Sender: TObject);
var f:Tform1;
begin
try
f:=form1.Create(fctpanel);
f.BorderStyle:=bsnone;
f.Align:=alclient;
f.ParentWindow:=fctpanel.Handle;
f.Show;
except
end;
end;
不知道哪里错了，反正每次提示加粗那句出错，谁帮帮忙啊 展开
展开全部
你引用了TForm1么，没有的话要在Uses里引用。还有就是f:=Tform1.Create(fctpanel);f.Parent:=fctpanel;有错继续提
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
