Zitat von
LuckyStrike4life:
Delphi-Quellcode:
procedure TForm1.BitBtn4Click(Sender: TObject);
begin
q_Delete.SQL.Clear;
q_Delete.SQL.Add('DELETE FROM mainDB WHERE MainDB=:Id');
q_Delete.ParamByName('Id').AsInteger := querysort.FieldByName('MainDB').AsInteger;
q_Delete.ExecSQL; // Wichtig, hier kein Open
querySort.Refresh; // Anzeige aktualisieren.
end;
Du hast doch schon ganz gut angefangen. Jetzt mußt eben nur Spaltennamen verwenden, die es tatsächlich gibt!