B
bluenats
Unregistered / Unconfirmed
GUEST, unregistred user!
开始在动态连接库中包含了一个窗体,创建窗体的接口函数如下:
procedure FuncFormShow(AHandle: THandle);stdcall;
begin
Application := AHandle;
fmMain := TfmMain.Create(Application);
try
fmMain.ShowModal;
finally
fmMain.Free;
end;
end;
如果调用窗体和动态连接库中窗体的FormStyle都为fsNormal则正常创建并显示
如果我想将调用窗体作为MDIForm,另外一个作为子窗体,则会出现内存读写错误,
请给出原因和解决方法。
procedure FuncFormShow(AHandle: THandle);stdcall;
begin
Application := AHandle;
fmMain := TfmMain.Create(Application);
try
fmMain.ShowModal;
finally
fmMain.Free;
end;
end;
如果调用窗体和动态连接库中窗体的FormStyle都为fsNormal则正常创建并显示
如果我想将调用窗体作为MDIForm,另外一个作为子窗体,则会出现内存读写错误,
请给出原因和解决方法。