TIBQuery Zugriffsverletzung bei Query.First

[BenjaminH]

Hallo,
ich habe ein echt seltsames Problem. Bei einem Insert mittels TIBQuery, füge ich einen neuen Datensatz ein und verwende dabei auch

Code:

 returning "id";

Der relevante Code lautet:

Code:

Query.Open;
Query.First;
result:=Query.Fields[0].AsInteger;

Beim Aufruf von Query.First bekomme ich eine Zugriffsverletzung

Zitat:

Schreiben von Adresse 00000000' aufgetreten.

In der Datenbank ist der neue Datensatz zu finden.
Kann mir vielleicht jemand auf die Sprünge helfen?
Vielen Dank,
Benjamin

[mkinzler]

Es scheint keine Instanz zu bestehen

[DeddyH]

Nach dem Open solltest Du eigentlich automatisch auf dem ersten DS stehen, so denn einer vorhanden ist. Wie ist es so?

Delphi-Quellcode:

Query.Open;
if not Query.EOF then
  result:=Query.Fields[0].AsInteger;

[Bernhard Geyer]

Zitat:

Zitat von BenjaminH (Beitrag 1030585)

Hallo,
ich habe ein echt seltsames Problem. Bei einem Insert mittels TIBQuery, füge ich einen neuen Datensatz ein und verwende dabei auch

Code:

 returning "id";

Kann das TIBQuery überhaupt? Insert mit anschließender Rückgabe eines Wertes?

[mkinzler]

Oder der wert wird als Parameter zurückgegeben

[BenjaminH]

Zitat:

Zitat von mkinzler (Beitrag 1030589)

Es scheint keine Instanz zu bestehen

Dann dürfte der Datensatz aber doch auch nicht in der DB auftauchen, oder?

Zitat:

Zitat von DeddyH (Beitrag 1030590)

Nach dem Open solltest Du eigentlich automatisch auf dem ersten DS stehen, so denn einer vorhanden ist. Wie ist es so?

Delphi-Quellcode:

Query.Open;
if not Query.EOF then
  result:=Query.Fields[0].AsInteger;

Listenindex überschreitet das Maximum.

Zitat:

Zitat von Bernhard Geyer (Beitrag 1030592)

Kann das TIBQuery überhaupt? Insert mit anschließender Rückgabe eines Wertes?

Jap, hat genau so schonmal funktioniert.(Oder bilde ich mir das ein?)

Zitat:

Zitat von mkinzler (Beitrag 1030595)

Oder der wert wird als Parameter zurückgegeben

Wie bekomme ich den dann?

Trotz allem: Die Zugriffsverletzung dürfte doch nicht auftreten, oder?

[DeddyH]

Und bei

Delphi-Quellcode:

result:=Query.Parameters[0].AsInteger;

:?:

[mkinzler]

SQL-Code:

returning

ist eine Erweiterung von FireBird. es ist die Frage, ob IBX, welche ja für Interbase sind, dies können. wenn dann über den Parameter

[BenjaminH]

Oh, ok, es sieht so aus, als ob es nicht geht. Komisch, ich dachte das hätte vor 3 Tagen noch funktioniert. Seltsam.

[idefix2]

Ich habe auch eine ganze Weile mit Komponenten für Interbase herumgerauft, bevor ich es aufgegeben habe.
Ich würde Dir die Verwendung der UIB Schnittstelle empfehlen, die funktioniert mit Firebird klaglos.
Etwas verwirrend allerdings dort:
Execute immediate liefert den "retuning id" Wert in einem Params Puffer, während Prepare/Execute diesen Wert als Result Singleton zurückgibt.