timer +1

[dec]

Hola,

Recordé este Hilo publicado hace tiempo y, para lograr un efecto como el que precisas, no necesitas sino la siguiente instrucción en el evento "OnCreate" del formulario:

Código Delphi [-]
  AnimateWindow(Form1.Handle, 1000, AW_BLEND);

De todos modos (no estoy ahora del todo seguro) es posible que el efecto "de transparencia" siga sin ser válido en todas las versiones de Windows.

Actualización: Según la descripción de la función "AnimateWindow" que puede encontrarse aquí mismo dicha función está disponible en Windows 98 y Windows 2000... desde luego también en Windows Xp e ignoro si en otras versiones de Windows.

[slim jim]

gracias por responderme se me hizo mas manejable el ke me diste primero (alphablendvalue := alphablendvalue +1) ya lo prove y me funciono como lo esperaba

[dec]

Hola,

Yo me plantearía el uso de la función "AnimateWindow". Primeramente porque lo considero más sencillo: no necesitas "TTimer". En segundo lugar porque dicha función parece estar disponible a partir de Windows 98, mientras que la propiedad "AlphaBlend" (según la ayuda en Delphi) no funcionará en máquinas que no tengan instalada una versión de Windows 2000 ó superior. Pero, en fin, el programa lo haces tú, pues no faltaba más.