Crear formulario de Seguridad.

[roman]

Un ejemplito. Cuando den clic en OK:

Código Delphi [-]
if 
  TableUsuarios.Locate('login', EditLogin.Text) // ¿existe el usuario?
  and
  TableUsuarios.FieldByName('password').AsString = EditPassword.Text // ¿es correcto el password?
then
begin
  ShowMessage('Datos correctos, procede abrir el sistema');
end
else
begin
  ShowMessage('Datos incorrectos');
end;

// Saludos