Forum: Multimedia
Delphi
by Khabarakh,
10. Jun 2005
Habe ich doch :zwinker: :
Angepasst an dein Codefragment:
var
Tot: Boolean;
begin
Tot := PtInRect(Invader1, Bullet.TopLeft);
end;
Für funktionierenden Code bräuchten wir schon etwas mehr von deinem bisherigen.
Forum: Multimedia
Delphi
by Khabarakh,
9. Jun 2005
Mit der Funktion Types.PtInRect sollte es gehen:
Tot := PtInRect(Bounds(Enemy.Position.X, Enemy.Position.Y, Enemy.Width, Enemy.Height), Bullet.Position);
Wenn die Invaders nicht nur mit einem Punkt der Bullets kollidieren sollen (können sie überhaupt :gruebel: ?), solltest du statt PtInRect IntersectRect benutzen.