busqueda en base de datos

[luigi]

hola

(soy un poco nuevo en delphi)

disculpen, mi problema es el siguiente:

tengo una tabla llamado socios y quiero que cuando ponga en un edit el numero de socio y le de a un boton llamado buscar, que en mis otros edit's que tengo me aparezcan el nombre del socio,apellido, direccion, etc.

no soy muy bueno explicando pero si me entendieron, les agradeceria mucho su ayuda.

[marcoszorrilla]

Si son todo Tedits y no TdbEdits.

1º.-Si la tabla está indexada por dicho campo.

MiTabla.IndexName:='ElCampo';
Esto puede ir en el evento al mostrar del formulario por ejemplo.

Cuando pulses en el botón de búsqueda:

MiTabla.FindKey([Edit1.Text]);

Sino está indexada tendrías que utilizar Locate.

Partiendo de que la tabla si está indexada, quedaría algo así.

If MiTabla.FindKey([Edit1.Text]) then
begin
  MiEdit1.text:=MiTablaMiCampo1.Value;
  MiEdti2.Text:=FloatToStr(MiTablaMicampo.Value);
  MiEdit3.Text:=DateTostr(MiTablaMiCampo.Value);
else
begin
  //las acciones oportunas
  ShowMessage('No existe ese registro...');
end;

Un Saludo.

[Cabanyaler]

... Hola, tb puedes hacer la asignación a los EDITS si son TEdits en el evento AfterScroll del DataSet. De esto modo cuando se produzca un movimiento devido a la pulsación de un Navigator asociado p.e., tb tendrás actualizados los datos en pantalla.
Suerte.

[luigi]

gracias por su ayuda

me sirvio mucho