Thema: Delphi Verwedung des ErrorCodes

Einzelnen Beitrag anzeigen

Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
831 Beiträge
 
Delphi 10.4 Sydney
 
#7

Re: Verwedung des ErrorCodes

  Alt 27. Aug 2008, 20:05
Hi mkinzler,

ich stelle mich wohl nicht gerade geschickt an...

folgendes habe ich versucht
SQL-Code:
begin
  sqlquery1.sql.Text:=('select LogIn, BenutzerID, AbteilungID, Passwort from Benutzer where LogIn=');
  sqlquery1.SQL.Add(#39+Benutzername.Text+#39);
  sqlquery1.Open;
  while not clientdataset1.eof do
  begin
    showmessage(sqlquery1.fieldbyname('Passwort').asstring);
    if sqlquery1.FieldByName('Passwort').asstring = Passwort.Text then
      begin
        showmessage('Passwort Korrekt');
        menueunit.BenutzerID:=sqlquery1.fieldbyname('BenutzerID').asinteger;
        menueunit.AbteilungID:=sqlquery1.fieldbyname('AbteilungID').asinteger;
      end
    else
      showmessage('Benutzername oder Passwort ist nicht korrekt');
  end;
end;
Aber wenn ich das so einstelle, dann läuft er nicht durch die Schleife.

Was mache ich falsch?
Patrick
  Mit Zitat antworten Zitat