Bueno ya me llevo el codigo para probarlo a ver que tal me va, pero sigo sin entender esta parte:
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
ademas de que
edUser.Text edPassword que son? dos edit que tengo que tener solamente en el formulario?, ya los listbox no los necesitaria con esta opcion¿?