|
Puedes usar el evnto de StringGrid DrawCell, el cual se ejecuta antes de que se dibuje cada celda, y en el cual puedes establecer las propiedades del canvas como quieras para que se el texto salga como quieras y el fondo del canvas igual.
El siguiente codigo si lo asocias a un StringGrid en el evento DrawCell, te escribra el texto Hola, en negrita en las columnas impares y normal en las pares.
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
If (ACol div 2)=(ACol / 2) then
TStringGrid(Sender).Canvas.Font.Style:=[]
else
TStringGrid(Sender).Canvas.Font.Style:=[fsBold];
TStringGrid(Sender).Canvas.TextOut(Rect.Left,Rect.Top,'Hola');
end;
|