Transparencia no funciona en Win98
 

Hola, estoy intentando hacer i aplicación lo mejor compatible posible, es decir que funcione tanto en Win 98 como XP, uso Delphi 7, el TImage tiene la propiedad Transparent activada, la Forma también tiene su propiedad TransparentColor activado con el color Fucsia como valor.

Funciona a la perfección en Win XP pero en el 98 el fondo se va a negro.

Imagen en tiempo de diseño:


Imagen funcionando en XP:


Imagen con fondo negro en Win 98:

Me cuesta creer que algo así vaya a funcionar en Win9X, al menos en algo más antiguo que Windows 98 SE.

En algún sitio leí hace años que había que recortar la ventana a mano. Hay funciones de la API de Windows que sirven para eso. No lo recuerdo bien porque ya digo que fue hace años, pero me suena.

Yo recuerdo haber hecho cosas similares con componentes de terceros.

API SetLayeredWindowAttributes;

Alternativa 9x, usar APIs; CreateRectRgn, CombineRgn y SetWindowRgn.

Ok, muchas gracias vamos a probar

Busca un programa llamado GabesOddForm; Te facilita mucho la creación de regiones. Si le pasas la imagen, te genera el PAS con los puntos de la rigión creada.