掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
プロジェクトをDLL化して、別iプロジェクトで呼び出すには? (ID:772)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんにちは 鷹羽あずさと申します。早速ですが質問です。 Delphiのプロジェクト(多数フォームを含む)全体をDLL化して、別のDelphiから 呼ぼうと考えているのですが、どうしてもうまくいきません。 どなたか、御教授お願い致します。以下失敗したサンプルコードを添付致します。 呼び出し側はプロジェクトFileのみ、DLLがわはライブラリ1・フォーム2です。 呼び出し側です unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; (中略) var Form1: TForm1; function FncForm(): integer; external 'Keisan.dll'; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var Retrun: integer; begin Retrun := FncForm(); button1.Caption := varTostr(Retrun); end; end. ↓ここよりDLL側です library Keisan; uses SysUtils, Classes, SubA01 in 'SubA01.pas' {frm001}, SubA02 in 'SubA02.pas' {frm002}; {$R *.res} function FncForm(): integer; stdcall; begin frm001.Create(frm001); frm001.Show; result := 1; end; exports FncForm(); begin end.
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.