Fórum movendo imagens #165394

08/06/2003

0

Como faço para fazer com que uma imagem ´ande´ pelo form seguindo uma trajetoria que sera devinida via codigo.
Desde ja agadeço


Emilio

Emilio

Responder

Posts

08/06/2003

Pardal3000

Olá amigo,

Tente usar o Image.Left e Image.Top para mudar a imagem de lugar dentro do form... Utilize um Timer para dar o ´movimento´... Tipo assim:

Primeiramente crie duas variáveis globais (no Var do inicio do Form):

Var
ImgLeft, ImgTop: Integer;

Depois, no evento OnTime do Timer, coloque:

Procedure Timer1.OnTime (Sender: TObject);
Begin
Image1.Left:=Image1.Left+2;
Image1.Top:=Image1.Top+1;
end;

Coloque na propriedade Time do Timer1 o intervalo. PS: 1000 = 1 segundo;

Outra dica é utilizar o Screen.Width e Screen.Height para delimitar o ´espaço´ em que a imagem poderá se mover...

Espero ter ajudado,

Pardal3000


Responder

Gostei + 0

08/06/2003

Robotizar

ae deste jeito funciona mas vc vai notar que a imagem fica piscando
entra ai foi um tutorial que eu fiz encinando a manipular sprites vai resolver este problema
[url]http://www.pdj.com.br:16080/forum/viewtopic.php?t=492[/url]


Responder

Gostei + 0

08/06/2003

Kroki

Eu baixei em um Site que ,não lembro qual é,um toturial muito bom onde vc aprende do inicio(piscando) até a utilização de BackBuffer.
De uma olhada;
http://www.kroki.hpg.com.br/dwon/video.zip


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar