Einzelnen Beitrag anzeigen

Benutzerbild von AirJordan
AirJordan

Registriert seit: 29. Mär 2005
Ort: Hamburg
214 Beiträge
 
Delphi 7 Enterprise
 
#10

Re: Form in DLL in Verbindung mit Datenmodule

  Alt 2. Dez 2007, 19:16
Antwort und Lösung gefunden


Delphi-Quellcode:
library formularName1;

uses
  SysUtils,
  Classes,
  Forms,
  dxThemeManager,
  formularName1 in 'form1.pas{form1},
  formularDaten in 'formdaten.pas{formularDaten: TDataModule};

{$E dll}

{$R *.res}

procedure CloseThemen;
begin
  CloseAllThemes;
end;

procedure ShowFormular1; stdcall;
begin
  formularDaten := TformularDaten.Create(Application);
  formularName1 := TformularName1.Create(Application);
  try
    formularName1.ShowModal;
  finally
    FreeAndNil(formularName1);
    FreeAndNil(formularDaten);
  end;
end;

exports ShowFormular1,
        CloseThemen;

begin
end.
Und im Hauptprogramm:

Delphi-Quellcode:

[..]

initialization

finalization
  CloseThemen;
Und schon gibt es keine Exception.

Grüße
Holger
Holger
Georg Schramm über Lothar Dombrowski:
"Er krankt daran, dass die Leute in einer
schrecklichen Welt leben und lachen..."

_
  Mit Zitat antworten Zitat