bei String, Array, und Records suchen

[DeddyH]

Na, wie jede "normale" Funktion auch:

Delphi-Quellcode:

aName := edtName.Text;
aPasswort := edtPasswort.Text;
if PersonInList(aName, aPasswort) then
  LoggedIn := true
else
  MessageBox(Handle, 'Benutzer unbekannt oder falsches Passwort', 'Fehler beim Login', MB_OK or MB_ICONERROR);