Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   string grid (https://www.clubdelphi.com/foros/showthread.php?t=17208)

rebollo75 28-12-2004 20:22:28

string grid
 
hola a todos,

me gustaria saber si alguien sabe como puedo poner las rows de un string grid las pares en verde y las impares en rojo, pq no me funciona con el canvas.

muchas gracias.

roman 28-12-2004 23:33:52

¿Cómo estás usando el Canvas? Debes usarlo en el evento OnDrawCell del StringGrid.

// Saludos

rebollo75 29-12-2004 12:46:34

lo he puesto asi:


procedure Tfalq.sgartDrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if (arow div 2) = 0 then
sgart.Canvas.Brush.Color:=clred
else
sgart.Canvas.Brush.Color:=clblue;
end;

y nada de nada. lo he probado con el brush y con el font y sigue sin funcionarme.
gracias.:confused:

roman 29-12-2004 18:48:40

Es que no estás haciendo nada ;)

Con sgart.Canvas.Brush.Color únicamente estás indicando de que color quieres pintar la fila pero no la estás pintando. Para ello debes usar algo como sgart.Canvas.FillRect(Rect).

// Saludos

rebollo75 29-12-2004 20:16:50

un millon de gracias roman:confused:


La franja horaria es GMT +2. Ahora son las 23:58:52.

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