Club Builder

[MAC]

Saludos estoy intentando hacer transparente el fondo del los TabSheet de un TPageControl el siguiente codigo tomado de un mensaje enviado por Leo funciona perfectamente para el PageControl

SetWindowLong(PageControl1->Handle, GWL_EXSTYLE,
GetWindowLong(PageControl1->Handle, GWL_EXSTYLE) | WS_EX_TRANSPARENT);

pero me gustaria saber como se puede hacer lo mismo con los tabsheet ya que no funciona de la misma manera y no tengo ni idea de que mensajes se deven tomar para que funcione. Le agradeceria mucho a Leo o a cualquier otro miembro del foro que me diera una ayuda gracias.

[MAC]

Saludos he estado intentando de distintas formas pero aun no
logro poner las Tabsheets del PageControl transparente no se si se pueda pero si alguien sabe como hacerlo les agradeceria mucho la ayuda.

[_Leo]

La tarea no es tan sencilla, tendrias que jugar con los mensajes WM_ERASEBKGND y WM_PAINT como minimo y capturar el fondo y volver a pintarlo etc...

Pero bueno, por si te vale un truco mas sencillito, puedes aplicarle una textura tanto al TPageControl como a cada TTabSheet:

// Añade un TImage (Image1) y carga en el una imagen BMP
// Añade las siguientes lineas al constructor del Form:
PageControl1->Brush->Bitmap = Image1->Picture->Bitmap;
TabSheet1->Brush->Bitmap = Image1->Picture->Bitmap;
(las imagenes preferiblemente que sean mosaicos que se puedan repetir)

Y para pintar las pestañas fijate en el siguiente ejemplo:
https://cppbuilder.es/viewtopic.php?t=4838
(en el ejemplo se usa color, pero sabiendo usar el TCanvas puedes pintar imagenes o lo que necesites en cada pestaña)

[MAC]

Ok muchas gracias Leo intertare probar hacerlo trasparente con los mensajes que me has dicho espero que me funcione pero sino la otra tambien es una buena solucion te agradesco mucho por la ayuda.