Como alterar a cor do datagrid em Delphi? Assim como o mesmo nome de controle no .NET.
-------------------------------------------------------- ------------------------
Parece estar escrevendo código no evento OnDrawdatacell.
-------------------------------------------------------- ------------------------
Procedimento TForm1.dbGridDrawColumnCell (remetente: TOBJECT;
const ret: Trect;
Estado: TGridDrawState);
Começar
Se dbgrid2.datasource.dataset.recno mod 2 = 1 então
Começar
Dbgrid2.canvas.font.color: = clblue;
Dbgrid2.canvas.brush.color: = Clyellow;
fim
mais começam
Dbgrid2.canvas.font.color: = clred;
Dbgrid2.canvas.brush.color: = ClGradientActiveCaption;
fim;
DbGrid2.DefaultDrawColumnCell (RECT, Datacol, coluna, estado);
fim;