掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
フォーム付DLLに別ユニット (ID：28641)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
あと、いいのか悪いのかわかりませんが、フォームの呼び出しは動的ロードで、 var ACreate:TCustomFormCreate; GetModule:HMODULE; begin //DLL取得 GetModule := LoadLibrary('AAA.dll'); if GetModule <> 0 then if GetProcAddress(GetModule,'FormCreateFunc') <> Nil then begin @ACreate := GetProcAddress(GetModule,'FormCreateFunc'); ACreate(Application.Handle); end; //DLL側 function FormCreate(hWnd: THandle):WordBool; stdcall; begin Application.Handle := hWnd; Form1 := TForm1.Create(Application); Form1.Show; end; 閉じるときにOnCloseのActionにcaFreeを突っ込んで終わらせてます。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.