[Jeswon]

Utilice el Codigo que me escribiste Johnny Q y si me sirvio como yo lo queria, y diras que soy encajoso pero me gustaria que asi como tengo el codigo ahora, cuando yo escriba el usuario no importe si lo pongo en mayusculas o minusculas el programa me lo acepte pero no suceda lo mismo con la contraseña. Bueno el codigo quedo de esta manera con la ayuda que me diste:

procedure TForm1.Button1Click(Sender: TObject);
begin
 If Table1.Locate('Usuario;Contraseña',VarArrayOf([Edit1.Text, Edit2.Text]),[])Then
   Begin
	Form1.DestroyWindowHandle;
	Form2.Show;
   End
 Else
  Edit1.Clear;
  Edit2.Clear;
  Edit1.SetFocus;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Application.Terminate;
end;
end.

Gracias por tu ayuda.