[Saiyan]

SI.. veo q mejor lo hago con una db .. je

Código Delphi [-]
with QryConsultas do
   begin
   close;
   SQL.Clear;
   consulta := 'Select * from TabUsuarios where IdUsuario ='+char(39)+ txtUsuario.Text+char(39)+
   'and ConUsuario ='+chr(39) + txtcontrasena.Text+char(39);
   valor := txtUsuario.Text;
   SQL.Add(consulta);
   Open;
   If (RecordCount=1) then

eso esncontré en uno de los hilos... lo prebo y aviso, gracias!