Select Distortion tool and Zipper distortion within, set Amplitude to 0 and adjust Distortion frequency for required curve precision. Finally, you can apply "Adjust -> Convert to curves".
P.S. In Corel VBA, there is a direct method of the SubPath (or Curve) class: the function GetPolyline(lPrecision As long) As Curve