Busqueda...

[[egostar]]

Debes usar el evento OnChange del Edit3 y creo que puedes poner QuotedStr(Edit3.Text+'%'), es cosa de que pruebes.

Lo de escribir el valor encontrado en el mismo Edit3, creo que deberias de crear una lista con los nombres que encuentre similares y seleccionar de ella el que deseas, imagina si encuentra 1000 con similar resultado.

Ahora mismo no traje mi laptop al trabajo, de hecho yo hice algo así, por la noche podría escribir de nuevo con lo que hice.

Salud OS.

[[Caral]]

Hola
Para variar Egostar tiene razon, dejame una Maestro.
Lo normal en estas busquedas es usar un grid en donde van apareciendo los resultados de la misma.
Se puede hacer con un simple filtro asi:
Este programa busca el cliente.

Código Delphi [-]
procedure TFBuscaCliente.Edit1Change(Sender: TObject);
var
   Filtro : String;
begin
   If (Edit1.Text <> '') then
   begin
      ATClientes.Filtered := False;
      If CBFiltro.Text = 'Código' then Filtro := 'CodCliente Like '+Edit1.Text
         else If CBFiltro.Text = 'Nombre' then Filtro := 'NombreCliente Like '''+ Edit1.Text + '*'''
            else If CBFiltro.Text = 'Teléfono' then Filtro := 'Telefono Like '''+ Edit1.Text + '*''';
      ATClientes.Filter := Filtro;
      ATClientes.Filtered := True
   end
   else ATClientes.Filtered := False;
end;

ATClientes: query
CBFiltro: Combombox que busca el tipo de filtro.
Si lo analizas un poco veras a que se refiere Egostar y Yo.
Saludos

[Neftali [Germán.Estévez]]

También puedes echarle un vistazo al ejemplo que hay en mi página, titulado "Generar una consulta LIKE (*) utilizando SQL", que creo que es muy parecido a lo que necesitas. Está en Delphi 6 y puedes mirar el código fuente.

Un saludo.