Problem beim Beenden (DLL mit Formular und mODBC)

[StTüff]

Hallo!

Aktueller Stand:

Delphi-Quellcode:

procedure DLLMain(Reason: Integer);
begin
  case Reason of
    DLL_PROCESS_ATTACH:
      begin
       DisableThreadLibraryCalls(hInstance);
       Form1:=TForm1.Create(nil);
      end;
    DLL_THREAD_ATTACH:
        ;
    DLL_THREAD_DETACH:
      ;
    DLL_PROCESS_DETACH:
      begin
       FreeAndNil(Form1);
       //Problem bei mSession finalization          !!!!!!!!!!!1
      end;
  end;

Beim Laden erzeugen, beim entladen freigeben.

Gruß,

StTüff

Edit:
Im ursprünglichen Beispiel:

Delphi-Quellcode:

initialization
begin
  Form1:=TForm1.Create(nil);
end;

finalization
begin
  Form1.Free;
end;

In der Datei DataMain.pas.... Macht aber keinen Unterschied.