New in Wolfram Mathematica 7: Comprehensive Spline Support  previous | next 
Import and Export Native Curves in Vector Formats
Composite Bézier curves can be exported directly to supporting formats.
In[1]:=

Click for copyable input
Graphics[BezierCurve[{{{2, 3}, {0.8125, 0.625}}, {{0.8125, 

     0.625}, {0.6875, 0.375}, {0.375, 0.25}}, {{0.375, 0.25}, {1.125, 

     0.25}}, {{1.125, 0.25}, {0.8125, 0.375}, {0.9375, 

     0.625}}, {{0.9375, 0.625}, {1.3125, 1.375}}, {{1.3125, 

     1.375}, {2.4375, 1.375}}, {{2.4375, 1.375}, {2.8125, 

     0.625}}, {{2.8125, 0.625}, {2.9375, 0.375}, {2.625, 

     0.25}}, {{2.625, 0.25}, {3.625, 0.25}}, {{3.625, 0.25}, {3.3125, 

     0.375}, {3.1875, 0.625}}, {{3.1875, 0.625}, {2, 3}}, {{1.875, 

     2.5}, {1.375, 1.5}}, {{1.375, 1.5}, {2.375, 1.5}}, {{2.375, 

     1.5}, {1.875, 2.5}}}]]
Out[1]=



In[2]:=

Click for copyable input
Graphics[BezierCurve[{{{2, 3}, {0.8125, 0.625}}, {{0.8125, 

     0.625}, {0.6875, 0.375}, {0.375, 0.25}}, {{0.375, 0.25}, {1.125, 

     0.25}}, {{1.125, 0.25}, {0.8125, 0.375}, {0.9375, 

     0.625}}, {{0.9375, 0.625}, {1.3125, 1.375}}, {{1.3125, 

     1.375}, {2.4375, 1.375}}, {{2.4375, 1.375}, {2.8125, 

     0.625}}, {{2.8125, 0.625}, {2.9375, 0.375}, {2.625, 

     0.25}}, {{2.625, 0.25}, {3.625, 0.25}}, {{3.625, 0.25}, {3.3125, 

     0.375}, {3.1875, 0.625}}, {{3.1875, 0.625}, {2, 3}}, {{1.875, 

     2.5}, {1.375, 1.5}}, {{1.375, 1.5}, {2.375, 1.5}}, {{2.375, 

     1.5}, {1.875, 2.5}}}]];

Export["letterA.pdf", %]
Out[2]=