Forum: Datenbanken
Delphi
by Delphi.Narium,
1. Mär 2018
Heißt das, dass Du sowas nicht machen kannst?
qry.SQL.Text := 'drop table irgendeinetabelle';
qry.ExecSQL;
Was wird denn dann aus
qry.SQL.Text := 'delete from tabelle where id = 1';
qry.ExecSQL;
oder
Forum: Datenbanken
Delphi
by Delphi.Narium,
1. Mär 2018
Mein Vorgehen ist eigentlich grob immer so in der Art:
// qry ist irgendeine Komponente zur Ausführung von SQLs.
qry.Close;
qry.SQL.Text := 'Eine Zeichenfolge, die irgendwo herkommt';
if AnsiLowerCase(copy(qry.SQL.Text,1,6)) = 'select' then begin
qry.Open;
end else begin
qry.ExecSQL;
end;
Natürlich gibt es immer 'ne Fehlerbehandlung, geht hier halt nur ums sinnmäße Prinzip. Dabei ist...