Ver Mensaje Individual
  #7  
Antiguo 19-01-2009
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Cita:
Empezado por roman Ver Mensaje
¿A qué te refieres con esto Caro? Aquí tengo un ejemplo muy parecido al tuyo y no noto nada raro.
Hola amiguito muchísimas gracias por responder, estaba segura que un día me responderías sobre la pregunta que hice en este hilo .

Ahora te explico, mi problema esta en que no solo quiero pintar el Tab quiero que se pinte todo el TabSheet cuando este activo, lo que se me ha ocurrido primero es poner un Panel del color que he pintado el Tab pero no se veía muy bien. Con esta línea de codigo:

Código Delphi [-]
 PageControl1.Pages[TabIndex].Brush.Color:=Control.Canvas.Brush.Color;

El TabSheet toma como color de fondo el color del Tab y se ve mejor que con un Panel. Mi problema esta ahí, cuando se ejecuta la primera vez siguiendo el ejemplo de arriba esta pintado con el color amarillo bajito cuando debería estar con el color amarillo fuerte ya que esta activo, pero cuando activas otro Tab no hay problema te lo pinta bien.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita