Delphi/C++ Builder - TDBGrid에서 활성/선택된 행 색상 설정

Question

TDBGrid 컨트롤에서 활성/선택된 행의 배경색을 설정하고 싶습니다. DBGrid를가있는 경우 작동

if (grid->SelectedRows->CurrentRowSelected) { 
    grid->Canvas->Brush->Color = clBlue; 
} 

2) 다음 코드 :

1) DBGrid를가 dgMultiSelect이되지 않을 경우, 아무 일도 발생하지 않는 옵션이있는 경우 다음 코드는 작동합니다

OnDrawColumnCell 이벤트를 사용

옵션 dgRowSelect은, 오직 선택된 셀이 아닌 전체 행은, 착색 될 것입니다하지 않을 경우 : 내가 witho 전체 활성/선택된 행을 색상 수있는 방법

if (State.Contains(gdSelected)) { 
    grid->Canvas->Brush->Color = clBlue; 
} 

dgRowSelect 또는 dgMultiSelect를 사용하여? OnDrawColumnCell에서

Answer 1

:

OnDrawColumnCell 이벤트 핸들러는 셀의 데이터 값을 작성하기 위해 데이터 인식 그리드를 지시 할 DefaultDrawColumnCell 메서드를 호출 할 수 있습니다.

DefaultDrawColumnCell과 같이 사용하십시오. 이것은 Delphi 코드이지만 쉽게 변환 할 수 있습니다.

procedure TForm1.DBGridDrawColumnCell(Sender: TObject;const Rect: TRect; 
DataCol: Integer; Column: TColumnEh;State: TGridDrawState); 
begin 
.....  
    DBGrid.Canvas.Brush.Color := clBlue; 
    DBGrid.DefaultDrawColumnCell(Rect,DataCol,Column,State); 
.... 

업데이트

어떻게 dgRowSelect 또는 dgMultiSelect을 설정하지 않고, DBGrid를 활성 행을 페인트하는 방법.

1. 현재 행의 상단 위치를 가져와야합니다.

CellRect, 골을 만들기 위해 클래스를을 TDBGrid의 inheritant을 정의하고 공공 행 삽입 :

procedure TMainForm.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; 
    DataCol: Integer; Column: TColumn; State: TGridDrawState); 

var Col,Row : Integer; 
begin 
    col := TMyDbGrid(DBGrid1).Col; 
    row := TMyDbGrid(DBGrid1).Row; 
    if (Rect.Top = TMyDBGrid(DBGrid1).CellRect(Col,Row).Top) and 
        (not (gdFocused in State) or not Focused) then 
    DBGrid1.Canvas.Brush.Color := clBlue; 

    DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State); 
end;