Buscar

Pricipio para jogos

Código

{insira uma image(image1) no form(formulario)}

//paleta de componetes: additional>image
//a image tera o nome de image1

{insira o codigo no evento KeyPress do form(formulario)}

 if (key='d') or (key='D') then
  begin
   image1.left:=image1.left +4;//imagen1 anda para direita
  end;

 if (key='a') or (key='A') then
  begin
   image1.left:=image1.left -4;//imagen1 anda para esquerda
  end;

 if (key='s') or (key='S') then
  begin
   image1.top:=image1.top +4;//imagen1 anda para baixo
  end;

 if (key='w') or (key='W') then
  begin
   image1.top:=image1.top -4;//imagen1 anda para cima
  end;

{tenho mais dicas fale comigo}

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Imagens
Adicionada dia: 03/04/07
Por: Everton Neves Da Silva
Visualizada: 2713 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009