Einzelnen Beitrag anzeigen

Benutzerbild von Back2Code
Back2Code

Registriert seit: 6. Feb 2012
Ort: Deutschland
272 Beiträge
 
Delphi XE7 Professional
 
#3

AW: Ptroblem bei meinem Loginsystem & der Hauptunit

  Alt 24. Feb 2012, 07:31
Moin...
beim Ablauf der Versuche machst du es doch auch. Warum nicht auch bei richtigem Paßwort ?
Delphi-Quellcode:
procedure TForm3.Button1Click(Sender: TObject);
begin
  if (edit1.Text= pwd) and (edit2.Text= usr) then
  Caption:=('Correct password');
  Close;
else
  Caption:=('Wrong password');
  trys := trys-1;
  if trys=0 then Close;
end;
- "Form3" entfernt
- Close hinzugefügt
Versteh nicht so wirklich was du mir damit sagen willst...
  Mit Zitat antworten Zitat