TCustomPointRecord

type TCustomPointRecord = record

  originalIndex: Integer;

  slope: single;

  empty: Boolean;

  next: Integer;

  winding: Integer;

  includeStartingPoint: Boolean;

  includeEndingPoint: Boolean;

  data: pointer;

  case Boolean of

    False: (

        x: single;

        y: single;

        x2: single;

        y2: single;

      );

    True: (

        coord: TPointF;

        coord2: TPointF;

      );

end;