Busqueda en un DBgrid

[feliz-58]

Hola de nuevo, en primer lugar gracias por responder a mis preguntas, se que pregunto mucho pero me gusta aprender todo lo que puedo XD jajaja pero gracias por todo...

La siguiente pregunta es: Tengo un DBgrid conectado a una base de datos en Access,con una tabla llamada Entrada, un boton y un edit, actualmente tengo el siguiente codigo en el Boton:

Código Delphi [-]
procedure Tregistro.BitBtn8Click(Sender: TObject);
begin
ADOTable1.Locate ('Nombre', edit1.text,[loCaseInsensitive]);
edit1.Clear;
end;
end;

como se dan cuenta es para localizar dentro del DBgrid un registro, pero esto solo funciona si se inserta el nombre exacto de la persona ejemplo:

si en el campo "Nombre" del Dbgrid hay un registro llamado Juan Perez
Si escribo en el edit : Juan Perez y doy clic en el boton, automaticamente lo locatiza, Pero si escribo Juan, no lo hace, no hay una forma de que tambien localice todos los nombres que comienzan con Juan?