Hallo Kollegen,
ich bekommen in meinem Programm nach Application.Terminate Fehlermeldungen (Schutzverletzung), und habe nach einigen Tests die
ADO-Unterstützung von D7 als Ursache gefunden.
Folgendes minimalistisches Programm erzeugt diese Schutzverletzungen:
Delphi-Quellcode:
program Project1;
uses Forms, Unit1 in 'Unit1.pas';
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
If not Fehler then Application.Run; // der Notausstieg im Fehlerfall
end.
Delphi-Quellcode:
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.
Die Fehlermeldung ist im Anhang.
Hat jemand eine Idee, was ich tun kann, um die Schutzverletzung zu vermeiden?
Beste Grüße,
Uwe