AdPhysics
type TPhysicalBoxSprite = class(TPhysicalSprite)
A sprite with box form
procedure InitializeShape; override;
Creates a box construct