long Posted September 19, 2019 Share Posted September 19, 2019 HI Exe How to Load Forms in DLL? Code execution does not report exceptions, but the main interface does not display DLL forms。 Main Form Calls DLL Code procedure TfrmMain.UniButton3Click(Sender: TObject); var f: TCreateDLLFormAsChild; c: TControl; begin f := GetProcAddress(DLLHandle, 'CreateDLLFormAsChild'); if Assigned(f) then begin c := f(UniTabSheet1); end; end; DLL Form Creation Method function CreateDLLFormAsChild(parent: TWinControl): TControl; stdcall; var frmResQuery: TfrmResQuery; begin if not Assigned(frmResQuery) then begin frmResQuery := TfrmResQuery.Create(UniApplication); frmResQuery.ParentFont := False; frmResQuery.ParentWindow := parent.Handle; frmResQuery.Visible := true; frmResQuery.Left := 100; frmResQuery.Top := 100; Result := frmResQuery; end; end; exports CreateDLLFormAsChild; Link to comment Share on other sites More sharing options...
Recommended Posts
Please sign in to comment
You will be able to leave a comment after signing in
Sign In Now