Hallo,
ich verwende XE2 , Firebird 2.5 und greife auf diese Datenbank über "InterBase Express core components" k zu.
Der Konstruct:
Delphi-Quellcode:
IBSQL := TibSQL.Create;
IBSQL.Database := Database
IBSQL.Transaction := readTransactin
IBSQL.Text := Select * from Daten where id=123;
IBSQL.Open;
...
IBSQL.Close;
IbSQL.Free;
Die Abfrage funktioniert korrekt.
Bei IBSQL.free
stürzt das Programm tief im System in "class function TMonitor.GetFieldAddress(AObject: TObject): PPMonitor; ab.
Anweisung Result := PPMonitor(PByte(AObject) + AObject.InstanceSize - hfFieldSize + hfMonitorOffset);
Hier scheint AObject.InstanceSize einen Zugriffsfehler zu bringen.
Das passiert aber nur bei manchen Abfragen.
Hat wer eine Idee was dass sein könnte?
Gruß Peter