Ver Mensaje Individual
  #2  
Antiguo 13-07-2003
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
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í.

Código:
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.
Responder Con Cita