o2DPolygon_1 is Polygon2D
Linestring2DAddPoint(o2DPolygon_1.Outline, -1.00, 1.00)
Linestring2DAddPoint(o2DPolygon_1.Outline, 1.00, 1.00)
Linestring2DAddPoint(o2DPolygon_1.Outline, 1.00, -1.00)
Linestring2DAddPoint(o2DPolygon_1.Outline, -1.00, -1.00)
Linestring2DAddPoint(o2DPolygon_1.Outline, -1.00, 1.00)
o2DPolygon_1 = GeometryCorrect(o2DPolygon_1)
SerializedPolygon is ANSI string
SerializedPolygon = GeometrySerializeWKT(o2DPolygon_1)
Trace(SerializedPolygon)