Mega Code Archive

 

Categories / Delphi / Graphic

 

Set colors for DBCtrlGrids lines

Title: Set colors for DBCtrlGrid's lines Use the OnPaintPanel event: procedure TForm1.DBCtrlGrid1PaintPanel(DBCtrlGrid: TDBCtrlGrid; Index: Integer); begin if Odd(DBCtrlGrid1.DataSource.DataSet.RecNo) then DBCtrlGrid1.Color:=clRed else DBCtrlGrid1.Color:=clBlue; end;