Source position: kraft.pas line 4511
public function TKraft.GetDistance(
const aShapeA: TKraftShape;
const aShapeB: TKraftShape
):TKraftScalar;