validar dos campos (password y usuario)

[Ade]

hola necesito que alguien me ayude, uso delphi 4 con componentes zeos y mysql, y puse en el boton entrar, lo siguiente;
ZTable1 es mi tabla de usuarios(nombre, usuario, password)

procedure TForm1.Button1Click(Sender: TObject);
begin
if not ZTable1.Locate('usuario', Edit1.Text, []) then
showmessage('Usuario incorrecto.')
else Form2.ShowModal
end;

solo trato de buscar en la tabla el usuario introducido por en el edit pero me sale el siguiente error;

Stack overflow, alguien podria ayudarme, gracias