怎样实现当点击dbgrid中某一行时让整个这一行都高亮显示

Question

dbgrid1.options:=dbgrid1.options+[dgRowSelect];

Answer 1

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
  Field: TField; State: TGridDrawState);
begin
  if State in [gdFocused]
    then
    begin
     //
    end;
end;
关键在于要处理DrawDataCell事件，用OwnerDraw来画

Answer 2

DBGrid1->options->dgRowSelect->true

Answer 3

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
  Field: TField; State: TGridDrawState);
begin
  if State in [gdFocused]
    then
    begin
     //
    end;
end;
关键在于要处理DrawDataCell事件，用OwnerDraw来画

Answer 4

luoweicaisd(笑三少) 说的很正确，我是过了