Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   StrinGrid se puede poner color a los datos (https://www.clubdelphi.com/foros/showthread.php?t=76439)

CarlosAlberto 01-11-2011 15:09:54

StrinGrid se puede poner color a los datos
 
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, donde mostraba como cambiar el color a una fila a una columna...
Saludos.

ecfisa 01-11-2011 22:08:21

Cita:

Empezado por CarlosAlberto (Mensaje 417274)
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:
Código Delphi [-]
...
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

Datos con color en una fila de un StringGrid
 
Estimado Ecfisa: funcionó la colocación de datos con color en un StringGrid.
Muchas Gracias
Carlos Alberto


La franja horaria es GMT +2. Ahora son las 20:08:16.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi