Главная страница
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.096 c
14-1090788390
parovoZZ
2004-07-26 00:46
2004.08.15
Не работает в оепере


14-1091107443
rea
2004-07-29 17:24
2004.08.15
Trial


1-1091076278
Mental_Ray
2004-07-29 08:44
2004.08.15
Как узнать позицию (не координаты) курсора в RichEdit?


8-1086101616
ki11er
2004-06-01 18:53
2004.08.15
Порезать AVI


4-1088779601
parovoZZ
2004-07-02 18:46
2004.08.15
WM_PAINT?