Dann hast du vorher nicht die
DB selektiert, die musst du dann angeben, bzw. die Tabelle ?.
Delphi-Quellcode:
procedure TForm2.Button6Click(Sender: TObject);
var
ex:boolean;
begin
idx := InputBox('
User löschen', '
Bitte UserID eingeben', '
');
if trim(idx) = '
'
then
begin
showmessage('
Keine UserID eingegeben');
end else
begin
FResult :=uMysqlClient.TMysqlResult.create(Fmysql,rtStored);
s := '
DELETE FROM <DB>.<TABLE> WHERE userid ='+idx+'
;';
FResult := FMysql.query(s, true, ex);
if ex
then
begin
TableContent;
{ Hier vielleicht noch Fresult auswerten
if FResult<>nil then
begin
FResult.First;
....
}
end else showmessage(fmysql.lasterror);
FResult.free;
end;