請問在DLL的Project檔裡這樣的格式對嗎？ library SetAuth; uses ShareMem, Forms, SysUtils, Classes, Main in 'Main.pas' {frmMain}, Data in '..\Reposit\Double\Data.pas' {DM: TDataModule}, Query in '..\Reposit\Query.pas' {frmQuery}, LookUp in '..\Reposit\LookUp.pas' {frmLookUp}; {$R *.RES} procedure PrgStart; begin Application.Initialize; Application.Title := ''; Application.CreateForm(TfrmMain, frmMain); Application.Run; end; exports PrgStart; begin end. 泓遠

------
泓遠

Dll是沒有application的, RunTime時是被載入到呼叫者之application中執行 可以改成這樣

procedure PrgStart(h:THandle);
var f:TfrmMain;
begin
  Application.handle:=h;
  Application.CreateForm(TfrmMain, f);
  f.showModal;  //或f.show;
end;    exports
procedure PrgStart(h:THandle);

呼叫時 PrgStart(applicaion.handle);