Delphi [Comando] Aparecer form lentamente.

[Kaao]

Comando simples, útil e legal para deixar seu projeto mais efeitado ^^

Adicione um Timer no form e nas características dele coloque o interval 1.
Agora no form na característica AlphaBlendValue coloque 0.

No Timer acrecente os seguintes comandos:

form1.AlphaBlendValue := form1.AlphaBlendValue + 2;

if form1.AlphaBlendValue = 254 then
begin
timer1.enabled := false;
end;

Você pode alterar o 2 (na primera linha) para a velocidade que vai aparecendo, mas lembre-se de colocar na terceira linha (if form1.AlphaBlendVa...) o maior valor múltiplo do número que colocou até 255.

Para os preguisosos coloquei alguns exemplos ^^

Lento

form1.AlphaBlendValue := form1.AlphaBlendValue + 1;

if form1.AlphaBlendValue = 255 then
begin
timer1.enabled := false;
end;

Rápido

form1.AlphaBlendValue := form1.AlphaBlendValue + 3;

if form1.AlphaBlendValue = 255 then
begin
timer1.enabled := false;
end;

Leu?
Clique em agradeçer!
Seu clique vale muito para min ^^

[Kauz]

Valeu kaao meu form ficou bem mais estiliso ^^, só pra lembrar que a popriedade AlphaBlend do form deve estar ativada ou seja, em true.

[stral]

Poxa legal

Bacana para deixa bem infeitado e tals.

Fazer Splach Screen ;D

Valeu.

[.:JR:.]

Gostei muito da dica e vou utilizar também...Obrigado!

[.:JR:.]

Ótima dica vou usar com certeza...Obrigado!