Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c