Thema: Delphi Passwortabfrage durch IB

Einzelnen Beitrag anzeigen

raccoon

Registriert seit: 18. Dez 2004
Ort: Herne
56 Beiträge
 
Delphi 7 Enterprise
 
#12

Re: Passwortabfrage durch IB

  Alt 9. Feb 2005, 13:57
so habs nochmal geändert, war nur leicht verwirrt gerade, nun also der quellcode sieht nun so aus:

Delphi-Quellcode:
procedure TForm1.BTN_LoginClick(Sender: TObject);
begin
  s1:=ED_Passwort.Text;
  s2:=ED_Username.Text;
  SQLConnection1.Params.Strings[1]:='password='+s1;
  SQLConnection1.Params.Strings[2]:='username='+s2;
  if (SQLConnection1.Params.Strings[1]=ED_Passwort.Text) and (SQLConnection1.Params.Strings[2]=ED_Username.Text) then
  begin
    Form2.Show;
    Form1.Visible:=false;
  end
    else ShowMessage('Falsche Eingabe');
end;
das programm startet, keine fehler doch er liest den benutzernamen oder das passwort nicht richtig ein, da ist noch ein kleiner fehler aber ich denke den schaff ich selber zu finden, wenn nicht ich weiß ja wo ich hilfe bekommen, danke sehr schonmal für deine hilfe.
  Mit Zitat antworten Zitat