Ich würde es so lösen:
Delphi-Quellcode:
RQuery2.SQL.Text:='SELECT count(*) as var2 FROM tabelle where Day = :PruefTag';
RQuery2.ParamByName('PruefTag').AsString := editX.Text;
RQuery2.Open;
if RQuery2.FieldByName('var2').AsInteger > 0
then
[B]update[/B]
else
[B]Insert[/B]
hoika war schneller. Ich poste trotzdem, da es mit Source-Beispiel ist.