Application.Terminate wird einfach ignoriert !! ???

[Uwe.F.]

Hallo Kollegen,

es muss wohl an ADO liegen; folgende minimalistische Konstruktion erzeugt den erwähnten Fehler:

Code:

program Project1;
uses  Forms,  Unit1 in 'Unit1.pas';
begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  If not True then Application.Run;
end.

Code:

unit Unit1;
interface
uses Windows, Forms, DB, ADODB, Classes;
type
  TForm1 = class(TForm)
    ADOConnection1: TADOConnection;
    ADOTable1: TADOTable;
  private
  public
  end;
var Form1: TForm1;
implementation
end.

Fehlermeldung: sieh Anhang.

Vermutlich muss ich die ADO "irgendwie" stoppen ... hat jemand eine Idee, wie

Gruss,
Uwe