怎么把一个窗体做成dll文件,然后调用呢?我不大理解为什么要这样写?dll窗体的!
这个过程为什么要这样写?
procedure ProvaChild(ParentApplication: TApplication; ParentForm: TForm); export; stdcall;
var
Form1: TForm1;
DllProc: Pointerbegin
Application:=ParentApplication;//这是什么意思?为什么要这样写?
Form1:=TForm1.Create(ParentForm);
Form1.MyParentForm:=ParentForm;//?
Form1.MyParentApplication:=ParentApplication;//?
Form1.Show;
end;procedure DLLUnloadProc(Reason: Integer); register;
begin
if Reason = DLL_PROCESS_DETACH then Application:=DllApplication;
//这里又是什么意思呢?能帮我解析一下吗?
end;
这个过程为什么要这样写?
procedure ProvaChild(ParentApplication: TApplication; ParentForm: TForm); export; stdcall;
var
Form1: TForm1;
DllProc: Pointerbegin
Application:=ParentApplication;//这是什么意思?为什么要这样写?
Form1:=TForm1.Create(ParentForm);
Form1.MyParentForm:=ParentForm;//?
Form1.MyParentApplication:=ParentApplication;//?
Form1.Show;
end;procedure DLLUnloadProc(Reason: Integer); register;
begin
if Reason = DLL_PROCESS_DETACH then Application:=DllApplication;
//这里又是什么意思呢?能帮我解析一下吗?
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货