Erstell Dir eine Tabelle ('User'= mit zwei Spalten: 'UserId', 'PasswordMD5'. Dann eine Funktion:
Delphi-Quellcode:
Function LoginOk (aUserID, aPassWd : String) : Boolean;
Begin
myUserTable.Active := True;
Result := myUserTable.Locate('UserID;PasswordMD5',VarArrayOf([aUserID, MD5Hash aPassWd)]),[]);
End;
Das ist die einfachste Variante. Es reicht aber, das mit einem entsprechenden select zu prüfen...