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 стырить.

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

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

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

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

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