PDA

Ver la Versión Completa : StrinGrid se puede poner color a los datos


CarlosAlberto
01-11-2011, 15:09:54
Estimados miembros: ¿en un stringgrid se puede colocar a los datos de una FILA o de una COLUMNA un color DISTINTO DEL NEGRO?
Gracias.
Saludos
Carlos Alberto

Cañones
01-11-2011, 15:33:08
Si se puede, hay muchos ejemplos.
http://www.clubdelphi.com/foros/showthread.php?t=5455
Hace poco encontré un ejemplo muy completo en el FTP (http://www.terawiki.clubdelphi.com/), donde mostraba como cambiar el color a una fila a una columna...
Saludos.

ecfisa
01-11-2011, 22:08:21
Estimados miembros: ¿en un stringgrid se puede colocar a los datos de una FILA o de una COLUMNA un color DISTINTO DEL NEGRO?
Hola CarlosAlberto.

Un ejemplo con TStringGrid:

...
implementation

var
ColDraw: Integer = 1;
RowDraw: Integer = 2;

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if ACol = ColDraw then // Pinta la columna indicada por la variable ColDraw
// Si cambias la condición por: ARow = RowDraw, pintará la fila indicada
with TStringGrid(Sender) do
begin
Canvas.Brush.Color:= clRed; // color fondo
Canvas.FillRect(Rect);
Canvas.Font.Color:= clWhite; // color letra
Canvas.TextOut(Rect.Left+1, Rect.Top+1, Cells[ACol,ARow]);
end;
end;


Un saludo.

CarlosAlberto
03-11-2011, 01:09:43
Estimado Ecfisa: funcionó la colocación de datos con color en un StringGrid.
Muchas Gracias
Carlos Alberto