function ShowDllForm:stdcall(Parent:THandle);stdcall;export;
begin
Application.handle:=parent;
//将容器设为应用程序句柄
//以非模态创建并显示窗口
if DllForm = nil then
DllForm := TDllForm.Create(Application);
DllForm.PParentWindow:=Parent;//将容器设置为父窗口
DllForm.Show;
Result := DllForm.Handle; //返回DllForm的句柄
end;