Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   asignar color a un shape (https://www.clubdelphi.com/foros/showthread.php?t=45652)

NSL94 10-07-2007 17:23:09

asignar color a un shape
 
Hola estoy usando report builder 6.03
y me gustaria saber como puedo asignar un color definido por una variable a un shape (rectangulo)
entiendo que deberia de ser algo parecido a:

Shape1.Brush:= INCIDENCIAS['color_per']

en el onprint, pero no me funcciona.
Gracias.

jhonny 10-07-2007 17:39:41

Si yo quiero darle color al Shape sería asi:

Código Delphi [-]
 
Shape1.Brush.Color := clBlue;

Bicho 10-07-2007 17:53:49

Hola,

para que se entienda lo que ha puesto jhonny

Código Delphi [-]
Shape1.Brush.Color := clBlue;

Si quieres cambiar el color, debes modificar la propiedad Brush.Color.
Esa propiedad es del tipo TColor y no de tipo String como parece que le estás intentando asignar tú.

Espero haya quedado un poco más claro.

Saludos

jhonny 10-07-2007 18:16:54

Cita:

Empezado por Bicho
Hola,

para que se entienda lo que ha puesto jhonny


Código Delphi [-]
Shape1.Brush.Color := clBlue;



Si quieres cambiar el color, debes modificar la propiedad Brush.Color.
Esa propiedad es del tipo TColor y no de tipo String como parece que le estás intentando asignar tú.

Espero haya quedado un poco más claro.

Saludos

Ahhh, claro, de pronto creí que los corchetes hacían referencia a alguna propiedad por defecto de alguna clase que el objeto INCIDENCIAS estaba instanciando... Mejor dicho, en el caso que sea lo que comenta Bicho, podríamos usar el siguiente método para convertir ese String a un TColor:
Código Delphi [-]
Shape1.Brush.Color := StringToColor('clBlue');
Espero que esto sirva de algo :).

NSL94 11-07-2007 09:33:04

...@^^@...
uuu\__/uuu

Gracias, a funccionado, luego cai en la cuenta que el valor que le asignaba era un String -_-¡ en fin un if blablabla y asignar color a mano.


La franja horaria es GMT +2. Ahora son las 21:01:09.

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