Zitat von
grenzgaenger:
wie wär's denn mit ...
Delphi-Quellcode:
Kassenbuch.ExecSQL('delete from kassenbuch');
// filtern
Ausgaben.active := false;
Ausgaben.SQL.Clear;
Ausgaben.SQL.Add('insert into kassenbuch (datum, zurgnr, betrag, vermkerk) select datum, zurgnr, betrag * -1, vermerk from ausgaben');
Ausgaben.active := True;
showMessage('Das Kassenbuch wurde erfolgreich erstellt');
PS: kann es sein, dass dein primary key nicht eindeutig ist?
Mein Primary Key steht auf AutoInc und NOT NULL. Gab damit noch nie Probleme.
Wenn ich diese sehr elegante Variante auslösen will, kriege ich die Fehlermeldung, dass das Feld ID nicht gefunden wurde.