Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.15;
Скачать: CL | DM;

Вниз

Обращение к свойствам спрайта через процедуру другого спрайта.   Найти похожие ветки 

 
Smoke_Gomel ©   (2004-05-01 12:18) [0]

Я создаю 2 спрайта :Thero1 и Thero2 (TImageSprite),как мне из процедуры
Thero1.DoCollision изменить x и y координаты другого спрайта? Подскажите пожалуйста.


 
Cash ©   (2004-05-02 09:29) [1]

Ну если DelphiX, то делать это можно так:

Procedure Thero1.DoCollision(Sprite: TSprite; Done: Boolean);
begin
 if Sprite is Thero2 then begin
   Sprite.X:=Sprite.X-2;
   Sprite.Y:=Sprite.Y-2;
   //Обращение к св-вам THero2
   (Sprite as THero2).Energi:=(Sprite as THero2).Energi-10;
 end;
end;


 
Smoke_Gomel ©   (2004-05-02 09:56) [2]

Cash
Спасибо большое. Ты мне сильно помог.



Страницы: 1 вся ветка

Текущий архив: 2004.08.15;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
3-1090238932
ligor
2004-07-19 16:08
2004.08.15
Текущая дата в IB 6.5 диалект 1


14-1090917276
Просто Вася
2004-07-27 12:34
2004.08.15
Пора отпусков


1-1091102938
Andrew
2004-07-29 16:08
2004.08.15
Сохранение файла в Excel


1-1091500904
race1
2004-08-03 06:41
2004.08.15
file mapping


14-1090823281
Ломброзо
2004-07-26 10:28
2004.08.15
ЧТо-то я ничего не понял. Толкователи есть?