gracias por el aporte ecfisa;
El codigo que me brindaste lo cambie pero no hace nada el codigo cambiado es el sgte;
Código Delphi
[-]
procedure TF_Principal.JvDBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if ((gdSelected in State) and (FPintar<>'')) then
with (Sender as TjvDBGrid) do
begin
if mdoq_listado.FieldByName('codigo').AsString=fpintar then
begin
Canvas.Brush.Color:= clblue;
Canvas.Font.Color:= clWhite;
DefaultDrawColumnCell(Rect, DataCol, Column, State);
FPintar:='';
end;
end;
y en el boton:
Código Delphi
[-]
procedure TF_Principal.Button2Click(Sender: TObject);
var i:integer;
begin
FPintar:= edit1.Text; jvDBGrid1.Invalidate;
end;
Como se ve lo que quisiera es que registrando en un edit el codigo de una de las oficinas que se busque en el dbgrid y se pinte la fila en un tiempo determinado y emitiendo un sonido
Gracias amigo por los aportes