错误,请进!!!(30分)

  • 主题发起人 主题发起人 Nizvoo
  • 开始时间 开始时间
N

Nizvoo

Unregistered / Unconfirmed
GUEST, unregistred user!
MDI窗体上有一QuickRep,MDI窗体是通过DLL调用的。
http://nizvoo.myetang.com/mdierror_0.gif
的错误,帮忙看看。
 
源代 码贴上
 
在DLL中不能传入tfont(作为函数参数),我遇到过
也不能在DLL中 somecontrol.font:=othercontrol.font;//也是不对
 
somecontrol.font:=othercontrol.font;//

我没有这句话,,我的主程序调用dll很简单。就是把dll的窗体作为MDI窗体调用。
传入参数为Application,Screen没有Fonts啊?源程序就是。

library Reportdll;

uses
SysUtils,
Classes,
Forms,
p_19 in 'source/p_19.pas' {frmMain},
p_20 in 'source/p_20.pas' {FrmImageComments},
p_18 in 'source/p_18.pas' {frmReport};



{$R *.res}
function ReportShow(App: TApplication; aScreen: TScreen): Boolean; stdcall;
begin
//try

Application := App;
Screen := aScreen;
frmMain := TfrmMain.Create(nil);
frmMain.Show;
//frmMain.ShowModal;

//finally
//frmMain.Free;
//end;
Result := True;


end;
exports
ReportShow;

begin
end。
 
http://nizvoo.myetang.com/mdierror_0.gif
 
接受答案了.
 
后退
顶部