¿Como realizo una consulta?

[Nelson Polanco]

Es mejor hacer un query y pasarle edit1 como parametro y luego tus datos saldran en el DBgrid. Ejemplo:

Begin
Query1.close;
Query1.sql.clear;
Query1.sql.add('Select * from tabla Where dni = :edit1.text');
Query1.open;

If Query1.IsEmpty Then
Begin
ShowMessage('DNI no encontrado');
End;
End;

Si existe dicho dni saldran tus datos. Espero te sirva. Suerte...

[Enan0]

Empezado por Nelson Polanco

Es mejor hacer un query y pasarle edit1 como parametro y luego tus datos saldran en el DBgrid. Ejemplo:

Begin
Query1.close;
Query1.sql.clear;
Query1.sql.add('Select * from tabla Where dni = :edit1.text');
Query1.open;

If Query1.IsEmpty Then
Begin
ShowMessage('DNI no encontrado');
End;
End;

Si existe dicho dni saldran tus datos. Espero te sirva. Suerte...

Bueno estubo casi Perfecto para mi gusto pero yo pondria en el ONCHAGE del EDIT lo suiguiente:

Código Delphi [-]
 AdoDATAset1.close;
 AdoDataset1.ParamCheck:=true;
  AdoDataset1.CommandText:='Select * from tabla Where dni like :MyDNI';
 AdoDataset1.Parameters.ParamByName['MyDNI'].value:=edit1.text;
  AdoDataset1.Open;
  
 (*el If empty lo sacamos porque esta consulta se ejecuta en cada
    cambio del edit y simplemente tendrias que enlazarlo al dbgrid*)
  End;