Boton buscar

[juliana Cano]

por favor necesito saber como se hace un botón buscar utilizando la conexión desde excel utilizando ADOconction, ADOtable y el datasource por favor ayuda....

[roman]

Primero tendrás que especificar qué es lo que entiendes por "botón buscar" y qué es lo que esperasque haga.

LineComment Saludos

[juliana Cano]

necesito un boton que cuando yo le copie un respectivo nombre me aparezca solo ese nombre con sus respectivas caracteristicas tengo un tedit donde se copia el nombre el botton y el tdbgrid pero no se como programar ese boton para que me busque esos datos

[roman]

Tu pregunta es ambigua, pero si lo que quieres hacer es un filtrado, tendrás que usar una consulta sql del tipo:

Código SQL [-]
select * from tabla where nombre like "%:nombre%

y en el evento onclick del botón sustituir el parámetro :nombre por el texto de tu edit.

LineComment Saludos

[ecfisa]

Hola.

Si deseas usar el ADOTable en la búsqueda, para posicionarte en el primer registro coincidente:

Código Delphi [-]
procedure TForm.btnBuscarClick(Sender: TObject);
begin
  ADOTable.Locate('NOMBRE_DEL_CAMPO', EditBusca.Text, [loCaseInsensitive, loPartialKey]);
end;

Y para mostrar en el DBGrid sólo los registros que coincidan con la cadena especificada en la propiedad Filter:

Código Delphi [-]
procedure TForm.btnBuscarClick(Sender: TObject);
begin
  if EditBusca.Text > '' then
  begin
    ADOTable.Filtered := False;
    ADOTable.Filter   := Format('NOMBRE_DEL_CAMPO LIKE %S', [QuotedStr(EditBusca.Text + '%')]);
    ADOTable.Filtered := True;
  end;
end;

Saludos

[juliana Cano]

muchas gracias.. me ayudo mucho...