Form abrindo devagar

[~Pkz 0]

Bem, como eu faria para que o form abra e feche devagar?

por exemplo, eu queria que ele surgisse na tela e fosse aparecendo aos poucos.

tem como?

[DragonBoss 9]

se não me engano esse efeito se chama "fade in", algo assim... enfim, bolei um esquema basicao aqui de como fazer:

 

deixa o AlphaBlend do Form em TRUE e deixa o AlphaBlendValue em 0.

Coloque um timer, e deixe com interval de uns 50... ( muda se necessario ) e dexa esse code nele:

 

begin

Application.ProcessMessages;

if AlphaBlendValue < 255 then begin

AlphaBlendValue := AlphaBlendValue + 5;

end;

end;

 

testa ae =X

altere os valores se quiser...

 

obs: esse é só o fade in, tem o fade out tbm, é parecido a logica (envertida), porém.. só no closing do form =X

 

flw, abraços