Delphi-Quellcode:
If Not fileExists(ExtractFilePath(Application.ExeName) + 'user/'+Edit1.Text+'.txt') Then
Begin
Application.MessageBox('Der User wurde nicht gefunden', 'Fehler', MB_ICONSTOP);
end
else
Memo1.Lines.LoadFromFile('user/'+Edit1.Text+'.txt');
end;
if Edit2.Text = Memo1.Lines[0] AND Edit1.Text = Memo1.Lines[1] then begin
Form1.Show;
end.
else
Application.MessageBox('Benutzername / Passwort stimmen nicht überein', 'Fehler', MB_ICONSTOP);
end;
hallo,
bei diesem code wird mir beim 2. If angezeigt:
dekleration erwartet aber if gefunden.
Warum geht das nicht