Вниз
Скачать: CL | DM;

DoCollision   Найти похожие ветки 

← →
Bogdan1024 ©   (2005-11-05 22:37) [0]

Делаю тренировочный арканоид;
У меня есть класс TBall и TBrick, где реализовывать столкновение? И как? Если в TBall, то не видно координат кирпича, если в TBrick, то не видно координат мяча. Ибо они все в прайват записаны.


← →
NightLord ©   (2005-11-05 22:40) [1]

procedure TBrick.DoCollision(Sprite: TSprite; var Done: Boolean);
begin
if sprite is TBall then begin
 TBrick(sprite).x;
 TBall(Sprite).x;
//и.т.д
end;
end;


← →
2Wish   (2005-11-05 22:47) [2]

2NightLord
А если он не в DelphiX делает?


← →
NightLord ©   (2005-11-05 22:51) [3]

Ну тогда надо указывать в чем =)


← →
Darthman ©   (2005-11-05 22:51) [4]

Тогда надо написать чего он хочет более детально. Телепатов нет, чтобы догадаться в чем он челает и откуда чего не видно.


← →
Bogdan1024 ©   (2005-11-05 23:10) [5]

TBrick = class
private
X, Y:integer;
Width, Height:word;
Exists:boolean;
protected
public
published
constructor Create(var DXImagelist: TDXImagelist);
destructor Destroy;
function IfColide(var Ball: TBall):boolean;
procedure Draw(var DXDraw: TDXDraw; var DXImagelist: TDXImagelist);
end;


← →
Bogdan1024 ©   (2005-11-05 23:11) [6]

Щитайте, что функции IfCollide нет. (забыл стререть)


← →
Bogdan1024 ©   (2005-11-05 23:11) [7]

TBall = class(TObject)
private
X, Y: integer;
Width, Height, Sp: word;
Ang: integer;
protected
public
published
Constructor create(DXImagelist: TDXimagelist);
Procedure Draw(var DXDraw: TDXDraw; var DXImagelist: TDXImagelist);
Procedure Move;
end;


← →
2Wish   (2005-11-05 23:14) [8]

ну тада пиши процедуру OnCollision =) можеш из DelphiX стырить.


← →
Кефир87 ©   (2005-11-05 23:14) [9]

Я думаю что надо наследовать метод DoCollision из класса TImageSprite... Хотя я тоже, к сожалению, не телепат...


← →
П7   (2005-11-07 17:45) [10]

Может следует их в паблик вынести и не тупить?

Q: "Как мне скушать бомж-пакет если он запечатан в целофановый пакетик? Залить пакетик водой? Тогда лапша не приготовится.. Сгрызть не заливая водой? Тогда можно отравиться пакетиком.."
A: "Попробуйте открыть пакетик и залить водой саму лапшу."
Q: "Я так и сделал, но отравился пакетиками от приправ и масла. Как быть?"
A: "Жаль, что вы не умерли, когда отравились.."



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

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



Память: 0.47 MB
Время: 0.023 c
2-1148455315
С.Фролов
2006-05-24 11:21
2006.06.11
Delphi и W2k3 не работает Ctrl+Alt+F11


2-1148761865
Yegorchic
2006-05-28 00:31
2006.06.11
Уменьшение размера JPEG файла


2-1148373421
Юрик
2006-05-23 12:37
2006.06.11
Поиск в аксесе ч з Дельфи??


15-1147887846
Nous Mellon_
2006-05-17 21:44
2006.06.11
Если бы этого не было, это надо было бы придумать


2-1148523613
pargo
2006-05-25 06:20
2006.06.11
Исключение при IdFPT.Connected




   Наверх