RE:TDBGrid con celdas de color
se me olvido en el anterior se me olvido algo
debes de llamar el metodo: DefaultDrawColumnCell
DefaultDrawColumnCell(Rec, DataCol, Column, State);
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
with Sender as TDBGrid do
begin
if DataCol = NumeroDeCampoQueTuNecesites then
begin
Canvas.Font.Color := El Color que quieras; // Para la letra
Canvas.Brush.Color := El Color que quieras; // Para el fondo
end
else begin
Canvas.Font.Color := El Color que quieras; // PAra la letra
Canvas.Brush.Color := El Color que quieras; // Para el fondo
end
DefaultDrawColumnCell(Rec, DataCol, Column, State); <--- AQUI MERO
end;
end;