Показать сообщение отдельно
Старый 28.01.2012, 20:51   #4
BODYBUILDER
AnyKey`щик
 
Регистрация: 11.01.2012
Сообщений: 6
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Procedure and Function

Ещё одна просьба: А как зделать так, если я столкнусь(дотронусь) до обьекта какого нибудь.Например у меня красный квадрат. Вот код:
Program tst:
var x,y:integer;
i,e,c:image;
begin
i:=loadImage('fon5.PNG');
e:=loadImage('object1.png');
c:=loadImage('object2.png');
repeat
if getKeyPressed=KE_KEY4 then x:=x-1;
if getKeyPressed=KE_KEY6 then x:=x+1;
if getKeyPressed=KE_KEY8 then y:=y+1;
if getKeyPressed=KE_KEY2 then y:=y-1;
drawImage(i,0,0); drawImage(c,40,40);
drawImage(e,x,y);
repaint;
until false;
end.
Хочу так, если двинуться на красный квадрат(обьект2) то пускай прога закроеться.
Пожалуйста додайте кода!
(Offline)
 
Ответить с цитированием