SpringConstraintParticle

type SpringConstraintParticle = class(RectangleParticle)

public

  function GetMass; override;

  function GetElasticity; override;

  function GetFriction; override;

  function GetVelocity; override;

  function GetInvMass; override;

  constructor Create();

  procedure init; override;

  procedure Paint; override;

  procedure UpdatePosition;

  procedure ResolveCollision(); override;

  function ClosestParamPoint();

  function GetContactParamPoint();

  procedure SetCorners();

  function ClosestPtSegmentSegment;

  property RectScale: Double; [rw]

  property RectHeight: Double; [rw]

  property FixedEndLimit: Double; [rw]

  property Mass: Double; [r]

  property InvMass: Double; [r]

  property Friction: Double; [r]

  property Elasticity: Double; [r]

  property Velocity: Vector; [r]

end;

SpringConstraintParticle

RectangleParticle

AbstractParticle

AbstractItem

TObject