Utilizando o evento (OnMouseMove do Delphi7)

1 - Vamos adicionar um (panel);
2 - Na "Object Inspector" com o panel selecionado :

2.1 - Color = "vermelho";
2.2 - Organize assim:



3 - Vá em eventos da  "Object Inspector" ;

3.1 - Selecione o evento "OnMouseMove" dando um clique duplo;
3.2 - Entre o begin e o end coloque isso:

Tecle (F12) para voltar a parte da interface e depois slecione o (Form)...
Com o (form) selecionado Va em "OnMouseMove" e coloque isso entre o begin e o end:


Agora é só dá (F9) e ver o resultado de nossa aplicação...

------------------------------------------------------------------------
COMPLEMENTO:

Mudando a forma do mouse...

Para mudar a forma do mouse é só ir no "Object Inspector" com o panel selecionado e mudar o cursor:

Mas vamos deixar mais divertido e vamos passar isso para a programação:

selecione o (panel) depois vá no evento OnMouseMove e na parte da programação você complementa com isso:


Depois de ter programado isso ai vamos selecionar o (form) e no evento OnMouseMove complemente com isso:

Agora tecle (F9) e veja o OnMouseMove fazer efeito...



Utilizando o evento (OnMouseMove do Delphi7) Utilizando o evento (OnMouseMove do Delphi7) Reviewed by Dayvid on 21:10 Rating: 5

Nenhum comentário