Delphi OpenParamQuery benutzen

Thema durchsuchen

Ansicht

Themen-Optionen

OpenParamQuery benutzen

Ein Thema von Luca Haas · begonnen am 13. Okt 2017 · letzter Beitrag vom 13. Okt 2017

Vorheriger Beitrag

Nächster Beitrag

mkinzler

(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.869 Beiträge

Delphi 11 Alexandria

AW: OpenParamQuery benutzen

13. Okt 2017, 17:46

zusammenfalten · markieren

Delphi-Quellcode:

			  
  //Das hier ist nur einmal nötig

  //Query.Close; ist nicht nötig

  Query.Paramcheck := true; //besser vor der Zuweisung der Abfrage, dass diese Einstellung auch wirkt

  Query.SQL.Text := 'SELECT MAX(ID) AS nextNr FROM TableWHERE LfdNr = :LfdNr';

  Query.Parameters.ParamByName('LfdNr').DataType := ftInteger;

  //Später nur noch dies

  Query.Parameters.ParamByName('LfdNr').Value := LfdNr;

  Query.Open;

  result := Query.FieldByName('nextNr').AsInteger + 1;