Crash vermeiden

[himitsu]

Zitat von jaenicke:

Append --> CheckBrowseMode (hier wird erkannt, dass der Status nicht passt) --> Post (als Konsequenz, weil da noch ein offener Datensatz hängt)

Kommt drauf an.
Einige DB-Komponenten haben auch sowas, wie eine AutoPost-Option.
Steht jenes auf False, dann würde ein Cancel gemacht, außer es würde explizit .Post ausgeführt.

[Sinspin]

Um solche Späße komplett zu vermeiden kann man auch was ganz anderes machen. Gerade in deinem Fall dürfte sich das anbieten da es wie ein klasisches Insert aussieht.
Nutze SQL. Ala :

Delphi-Quellcode:

query.SQL.Text := "INSERT INTO [fields ...] VALUES (...) " 
query.ParamByName(...)... 
query.Open;

Ich kenne FireBird nicht gut genug um dir zu sagen wie Du die AutoInc Id zurück bekommst. Bei ADS gibt es dafür eine DB seitige function "LastAutoInc" die ich nach dem Insert im gleichen Script aufrufe (deswegen nicht ExecSQL, sondern Open).
Arbeite mit einer lokal erzeugten Query, oder einer die nur für diese Aufgabe da ist. Wer mixt macht sich langfristig zusätzlichen Ärger.

[mytbo]

Zitat von Sinspin:

Ich kenne FireBird nicht gut genug um dir zu sagen wie Du die AutoInc Id zurück bekommst.

RETURNING clause. Verwendung mit FireDAC. Allgemeines zu Auto-Incremental Fields (FireDAC).

Bis bald...
Thomas