Buscar siguiente registro con F3 en un DBGrid usando Locate

[ecfisa]

Pero no filtrar la base por la condicion, sino mostrar todos los registros e ir moviendo el puntero por cada registro que encuentre el locate segun la condicion dada en un Edit.

Hola cubanbaker.

No entendía lo que buscabas, pero ahora creo que querés hacer algo similar a una busqueda incremental.

Para eso bastaría que usaras un ADOQuery con un DataSource asociado, un DBGrid asociado al anterior y agregues este código al evento OnChange del Edit:

Código Delphi [-]
procedure TForm1.Edit1Change(Sender: TObject);
begin
  with ADOQuery1 do
  begin
    Close;
    SQL.Text:= 'SELECT * FROM TU_TABLA WHERE TU_CAMPO LIKE :DATO ORDER BY TU_CAMPO';
    Parameters.ParamByName('DATO').Value:= Edit1.Text+'%';
    Open;
  end;
end;

Donde los nombres TU_TABLA y TU_CAMPO deberás reemplazarlos por los que utilices en tu caso.

Pero como te digo, no sé si te he interpretado bién...

Un saludo.

Edito: Se me olvidó agregar ORDER BY.