Einzelnen Beitrag anzeigen

Benutzerbild von Mithrandir
Mithrandir
(CodeLib-Manager)

Registriert seit: 27. Nov 2008
Ort: Delmenhorst
2.379 Beiträge
 
#1

Verständnisproblem - Warum funktioniert mein DELETE nicht?

  Alt 18. Sep 2009, 14:02
Datenbank: Firebird • Version: 2.1 • Zugriff über: ZEOS 6.6.x
Hi ihr,

irgendwie stehe ich gerade auf dem Schlauch. Dieser Code:

Delphi-Quellcode:
  procedure TDGHBDatabase.DeleteUserByName(Name: String);
  var
    DeleteUserQuery : TZQuery;
  begin
    DeleteUserQuery := TZQuery.Create(nil);
    with DeleteUserQuery do
      begin
        Connection := fConnection;
        ParamCheck := true;
        SQL.Text := 'DELETE FROM USERS WHERE USER_NAME = :user ';
        ParamByName('user').AsString := Name;
        ExecSQL;
      end;
    DeleteUserQuery.Free;
  end;
soll einen bestimmten Nutzer aus der Datenbank entfernen. Der Name existiert und wird korrekt übergeben. Die Tabelle existiert, die Spalte existiert - und dennoch: Aus der Datenbank wird der Eintrag nicht gelöscht. Jemand ne Idee, woran das liegen kann/was ich falsch mache?
米斯蘭迪爾
"In einer Zeit universellen Betruges wird das Aussprechen der Wahrheit zu einem revolutionären Akt." -- 1984, George Orwell
  Mit Zitat antworten Zitat