Math-Linear coordinates

From Vectorlab
Jump to: navigation, search

Shortcut for getting start and end point of lines, walls, arcs and any other object responding to the "GetSegPt" routines. By Orso B. Schmid

{ Orso ***************************** }
{ given any object responding to the GetSegPt calls, returns the coordinates of the arc start and end }
PROCEDURE M_LinearCoordinates(linearOrArcObj: HANDLE; VAR begObj, endObj: VECTOR);
		GetSegPt1(linearOrArcObj, begObj.x, begObj.y); { start }
		GetSegPt2(linearOrArcObj, endObj.x, endObj.y); { end }