Tutorial [DELPHI]Botão que foge do Mouse

['Lenneth 487]

Vamos Ao que interessa!

Button1.Left := Button1.Left +1;

Button1.Top := Button1.Top -1;

if Button1.Top = 0 then

Button1.Top := 576; //Este numero varia, coloque o botão no canto extremo inferior do **** e veja na propriedade Top o valor.

if Button1.Left = 784 then //Este numero varia, coloque o botão no lado extremo esquerdo do ****, veja na propriedade Left o valo.

Button1.Left := 0;

 

Pronto Basta Salvar e compilar (F9) :lol:

 

Creditos:Fenix

[Estarossa 3.445]

suhauhsas , Gostei !

Mais ele nao Foge do Mouse ele So Fica indo pro lado x.x

Mais Valew por Compartilhar !

[Lf' 6]

Pra quem não entendeu é pra adicionar o code no button

( acho que todo mundo entendeu, mas vai que tem alguém que nunca mexeu com delphi ;P )

 

Bom, eu não gostei muito não rs

o button só vai pra diagonal, mas ta bom..

 

Obrigado por compartilhar..