O
opf120
Unregistered / Unconfirmed
GUEST, unregistred user!
为了动态的显示做好的Frame在主窗体的固定位置Main_Plan2;写了一下代码!调试确不见对应的窗体显示;谁有好的解决方法....
constructor TXFm_ParFram.Create(AOwner: TComponent);
var
ParFrame: TXFm_ParFram;
begin
try
Name := 'Frame55';
Parent := XFrm_ParMain.Main_Plan2;
ParFrame := Self;
Align := alClient;
inherited Create(AOwner);
FormCreate(Self);
finally
end;
end;
constructor TXFm_ParFram.Create(AOwner: TComponent);
var
ParFrame: TXFm_ParFram;
begin
try
Name := 'Frame55';
Parent := XFrm_ParMain.Main_Plan2;
ParFrame := Self;
Align := alClient;
inherited Create(AOwner);
FormCreate(Self);
finally
end;
end;