(Moderator)
Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
Delphi 11 Alexandria
|
AW: DB 2Werte vergleichen um zwischen Insert und Update zu unterscheiden
25. Nov 2018, 20:25
Delphi-Quellcode:
Query1.SQL.Text:='update OPmonth set WorkH=:WorkH,EIndex=:EIndex,WIndex=:WIndex where id=:id';
Query1.Params.CreateParam(ftString,'WorkH',ptInputOutput);
Query1.Params.CreateParam(ftString,'EIndex',ptInputOutput);
Query1.Params.CreateParam(ftString,'WIndex',ptInputOutput);
Query1.ParamByName('WorkH').Text:=Edit29.Text;
Query1.ParamByName('EIndex').Text:=Edit64.Text;
Query1.ParamByName('WIndex').Text:=Edit65.Text;
Query1.ExecSQL;
Markus Kinzler
|
|
Zitat
|