Registriert seit: 29. Mär 2005
Ort: Hamburg
214 Beiträge
Delphi 7 Enterprise
|
Re: Form in DLL in Verbindung mit Datenmodule
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..."
_
|