busquedas con codigo delphi

[[BlueSteel]]

Hola ale_metall

lo que te dice contraveneno en el código que puso es que tienes que poner esto

Código Delphi [-]
if not dxgbuscar.DataSource.dataset.locate('CampoABuscar',edtBuscar.Text,[loCaseInsensitive, loPartialKey]) then begin
     //ShowMessage('No se encuentran registros');
   end; //fin if not
   if key=VK_Return then dxgbuscar.setfocus;

en el evento KeyPress de Edit (para el ejemplo llamado edtBuscar

espero que te sirva...