Tema: timer +1
Ver Mensaje Individual
  #2  
Antiguo 02-10-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Fíjate que no estás incrementando el valor de la variable "blaz", de tal modo que "AlphaBlendValue" valdrá siempre dos, esto es, "blaz + 1" (recuerda que "blaz" la inicializas en 1). Por otro lado podrías omitir el uso de dicha variable, incrementando el valor de "AlphaBlendValue" directamente, tal que así:

Código Delphi [-]
  AlphaBlendValue := AlphaBlendValue + 1;
En cualquier caso vigila estas dos cosas: primero, controla que al llegar a "AlphaBlendValue >= 255" paras el "TTimer", puesto que si este continúa habilitado la variable "AlphaBlendValue" se reiniciará a cero, creándose un "bucle infinito"; segundo, por si no lo sabías, te recuerdo que la transparencia de los formularios está disponible en Windows XP y no sé si Windows 2000, pero, desde luego, no en ninguna otra versión anterior de Windows.
__________________
David Esperalta
www.decsoftutils.com

Última edición por dec fecha: 02-10-2005 a las 03:40:56. Razón: Corrección del texto.
Responder Con Cita