Super, danke dir.
Nachdem ich das Problem mit "
CoInitalize" noch gelöst habe,
klappt es hervorragend.
Ich habe in meiner
DLL dazu noch eine "InitDLL" und eine "FreeDLL" Procedure angelegt.
Delphi-Quellcode:
uses
...
ActiveX,
...
procedure InitDLL(window: Cardinal);
begin
_hwnd := window;
CoInitialize(
nil);
Application.CreateForm(TDataModule2, DataModule2);
end;
procedure FreeDLL(window: Cardinal);
begin
CoUnInitialize();
end;
Holger
Glück findet sich nicht im Code
Gefahren werden ist nur solange schön wie man selbst nicht lenken möchte ...