Hallo,
Delphi-Quellcode:
if (EditBenutzer.Text = '') or
(EditKennwort.Text = '') then
begin
ShowMessage('Bitte anmelden');
EditBenutzer.SetFocus;
Exit;
end;
Bei deinem Code fehlt überall ein
begin
end
Und er führt nur den 1. Befehl aus (auch bei "Benutzername falsch")
Heiko