FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Ayuda con PageControl y TabSheet
Hola amigos del foro, los molesto porque tengo el siguiente inconveniente:
Mi aplicación tiene una pagecontrol con varias paletas (tabsheet). Lo que quiero hacer y no puedo, es que al hacer click en una de las paletas se me ponga en negrita o incluso cambiar el color de la fuente del Caption de dicha paleta, sin que me modifique nada más. La verdad he probado un par de cosas y no hallo resultados. Desde ya muchas gracias y espero de vuestra ayuda Saludos, Román |
#2
|
||||
|
||||
Hola,
Conste que no es respuesta, pero, si usaras cierto "TPageControl" que puedes encontrar en la Jedi Library (en la pestaña JVCL Globus 2) hallarías que puedes hacer lo que precisas y mucho más. Si no quisieras utilizarlo tal vez podrías estudiarlo, por ver si puedes implementar el asunto en un "TPageControl" como el que trae Delphi. |
#3
|
||||
|
||||
Si pones la propiedad OwnerDraw del PageControl en true y pones el siguiente código en su evento OnDrawTab:
lograrás que la pestaña activa tenga su rótulo de color rojo en negritas. Pienso que algo así es lo que quieres. // Saludos |
#4
|
|||
|
|||
Gracias!!!
Roman, era eso exactamente lo que buscaba, gracias!!!
|
#5
|
|||
|
|||
UHmmm
Pense que era más dificil, Gracias ROMAN.
|
#6
|
|||
|
|||
Hola,
Cita:
¿Como cambiar el color predeterminado que tiene la propiedad HotTrack a un rojo por ejemplo? Deiv Última edición por Deiv fecha: 15-12-2006 a las 23:29:33. |
#7
|
|||
|
|||
Hola Yo de nuevo,
He buscado en la Red y he encontrado esta dirección: http://delphi.about.com/cs/adptips20...ltip0800_2.htm El código funciona bien para un CheckBox, Label, StaticText, pero no así en un TButton, TTabSheet, donde apunto mi pregunta, ¿Que implementación requiere dicho ejemplo para cambiar el color de la propiedad HotTrack en un TTabSheet?
|
#8
|
|||
|
|||
He encontrado este otro consejo:
Cita:
|
#9
|
||||
|
||||
Cita:
hola y para que se le aplique a todas las pagina
__________________
Enseñar es la virtud de un sabio. |
#10
|
||||
|
||||
Hay un problema cuando el TabSheet está oculto o no es visible, ya no se corresponden los Caption's de los TabSheet's, si tienes 6 TabSheet y el que hace 3, lo pones oculto, el resto no se corresponde con su título, ¿cómo se pueden solucionar el problema?, la verdad, no lo se.
|
#11
|
||||
|
||||
Hola, solo tienes que quitar la condición del Active:
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. |
#12
|
||||
|
||||
Cita:
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. |
#13
|
||||
|
||||
Perfecto, pero el problema radica cuando el Font del TabSheet es negrita lo cual agranda el texto y se sale del marco del TabSheet.
Dejo el código que realizado con el que habéis aportado todos:
|
#14
|
||||
|
||||
Hay un error en el GetTabIndex, ya que sólo actúa sobre el PageControl1, si tenemos varios PageControl no funcionará, dejo código nuevo.
Un saludo P.D.: Perdón |
#15
|
|||
|
|||
Hola, estuve buscando en todos los foros y no logro pintar toda la pestaña, solo legre pintar el titulo de la pagina seleccionada, yo necesito pintar todo el pagecontrol de azul por ejemplo, ya que lo tengo en blanco unicamente todas las paginas y lo quegre pintar las fuentes que estan dentro de cada pagina paro la pagina no lo pintar alguna ayuda?
|
#16
|
||||
|
||||
El PageControl por defecto no lo soporta. O usas un componente de terceros (como los Raize) o bien metes adentro de cada pagina un TForm o TFrame empotrado. Es simplemente poner como Parent del objeto empotrado la pestaña
Luego es cuestion de que el objeto empotrado este pintado |
|
|
|