Forum: Datenbanken
Delphi
by haentschman,
14. Aug 2019
...:zwinker:
Anders ausgedrückt: Soll die Abfrage eine Ergebnismenge enthalten...Open. Alles andere ExecSQL. :zwinker:
FDQuery.SQL.Text := 'SELECT * FROM ' + DBNAME;
FDQuery.Open;
Forum: Datenbanken
Delphi
by haentschman,
14. Aug 2019
...kommt auf die Version an. :wink:
Forum: Datenbanken
Delphi
by haentschman,
14. Aug 2019
procedure DeleteClick(Sender: TObject);
var
sQuery : string;
begin
sQuery := 'DELETE FROM ' + DBNAME + ' WHERE seriennummer = 0000000000000000';
FDQuery.SQL.Clear;
FDQuery.SQL.Add(sQuery);
FDQuery.SQL.Add('SELECT * FROM ' + DBNAME);
FDQuery.Active := True;