Perdón, olvidé ese punto
Te comento las líneas de código que te resultan confusas:
Código Delphi
[-]
var
ix : Integer; pIn, uIn: Boolean; begin
ix := User.IndexOf(edUser.Text); uIn := ix <> -1; if uIn then pIn := edPassword.Text = Password[ix]; if not (pIn and uIn) then ...
Encontrarás una explicación mas detallada en la ayuda de Delphi (estando el cursor sobre el término deseado presiona F1), además te puede resultar útil:
Saludos