Verwendung von TZUpdateSQL

[hsbc]

Und wohin gehört die ExecSQL-Anweisung ?

Ich habe das mal so geändert, aber so geht das dann nicht mehr. Es kommt zwar keine Fehlermeldung, das INSERT wird aber nicht durchgeführt. Die ZQuery_Buchung ist mit der ZUpdateQuery_Buchung verbunden.

Delphi-Quellcode:

with DatenModul.ZUpdateQuery_Buchung do begin
  InsertSQL.Clear;
  InsertSQL.Add('INSERT INTO BUCHUNG (BUNR, ZIMMERNR, DATUM, KUNDENNR, PREIS, ANZPERSONEN) ' +
    'VALUES (:BuNr, :ZimmerNr, :Datum, :KundenNr, :Preis, :AnzPers);');

  Params.ParamByName('ZimmerNr').AsInteger := _ZimmerNr;
  Params.ParamByName('Datum').AsDate       := _Datum;
  Params.ParamByName('KundenNr').AsInteger := _KundenNr;
  Params.ParamByName('Preis').AsFloat      := _Preis;
  Params.ParamByName('AnzPers').AsInteger  := _AnzPers;
end;

try
  DatenModul.ZQuery_Buchung.ExecSQL;
except
  ShowMessage('Fehler beim Buchen');
end;

Irgendetwas verstehe ich hier noch falsch. Ich sehe in meinem Code auch keinen Vorteil, ausser dass ich noch zusätzlich eine TZUpdateSQL-Komponente verwenden muss.

mfg
Herbert