разворачивание компонента

[Titan123]

у меня вопрос по играм:
вот дан компонент bitbtn1-танк. как можно сделать так, чтобы при нажатии кнопок (влево,вправо,вниз,вверх) он не только ездил туда, но и разворачивался в ту или иную сторону? (как в танчиках)

[N!ckeL]

самое простое грузить 4 разные картинки, где танк развёрнут в нужную сторону.

[Titan123]

А как можно сделать, чтобы если, ты, например, развернут вниз, компонент image1 (снаряд) летел вниз, вправо-вправо и т.д.
у меня все время он летит вверх, чтобы я не делал!

[N!ckeL]

Код можно посмотреть?

[Titan123]

код в теме "Уроки по созданию игр для новичков..." я там написал

[N!ckeL]

движение вверх:
image1.top:=image1.top-1
движение вниз:
image1.top:=image1.top+1
движение влево:
image1.left:=image1.left-1
движение вправо:
image1.left:=image1.left+1

[Titan123]

это то я все знаю... мне нужно, дать условие, чтобы определить, когда нужно стрелять вверх, когда вниз и т.д.
не подскажите как это сделать?

[N!ckeL]

создайте переменную в private (я использую байт т.к. мало весит):

b:byte;

в OnCreate:

b:=1;//Танк 'смотреть' должен вверх

при нажатии вверх :

b:=1

при нажатии вниз :

b:=2;

при нажатии влево :

b:=3

при нажатии вправо :

b:=4

По таймеру стрельбы:

if b=1 then
image1.top:=image1.top-1;
if b=2 then
image1.top:=image1.top+1;
if b=3 then
image1.left:=image1.left-1;
if b=4 then
image1.left:=image1.left+1;