グラフィックの描画

グラフィックを追加することで、ドキュメントの見栄えがよくなり、視覚に訴えることができます。ドキュメントに、円弧、ベジェ、楕円、直線、円、多角形、折れ線、四角形などのさまざまなタイプの図形を追加できます。テキストに加えて円、四角形、ポリライン、ベジェなどのグラフィックを追加するには、次のコードを使用します。

Visual Basic
C#

Visual Basic

Dim word = New C1WordDocument()
' 描画の設定を行います
Dim rc As New Rect(100, 100, 300, 200)
Dim text As String = "Hello world of .NET Graphics and Word/RTF." & vbCr & vbLf & "よろしくお願いします。"
Dim font As New Font("Times New Roman", 12, RtfFontStyle.Italic Or RtfFontStyle.Underline)

' ワードドキュメントに描画します
Dim penWidth As Integer = 0
Dim penRGB As Byte = 0
word.FillPie(Colors.DarkRed, rc, 0, 20F)
word.FillPie(Colors.Green, rc, 20F, 30F)
word.FillPie(Colors.Teal, rc, 60F, 12F)
word.FillPie(Colors.Orange, rc, -80F, -20F)
For startAngle As Single = 0 To 359 Step 40
        Dim penColor As Color = Color.FromArgb(&Hff, penRGB, penRGB, penRGB)
        Dim pen As New Pen(penColor, System.Math.Max(System.Threading.Interlocked.Increment(penWidth),penWidth - 1))
        penRGB = CByte(penRGB + 20)
        word.DrawArc(pen, rc, startAngle, 40F)
Next
word.DrawRectangle(Colors.Red, rc)


' ベジェ曲線を表示します
Dim pts = New Point() {New Point(400, 100), New Point(420, 130), New Point(500, 140), New Point(530, 120)}

' ベジェを描画します 
word.DrawBeziers(New Pen(Colors.Green, 4), pts)


' ベジェ制御点を表示します
word.DrawPolyline(Colors.Gray, pts)
For Each pt As Point In pts
        word.FillRectangle(Colors.Orange, pt.X - 2, pt.Y - 2, 4, 4)
Next

' タイトル
word.DrawString(Strings.Bezier, font, Colors.Black, New Rect(500, 150, 100, 100))

var word = new C1WordDocument();
// 描画の設定を行います
Rect rc = new Rect(100, 100, 300, 200);
string text = "Hello world of .NET Graphics and Word/RTF.\r\nよろしくお願いします。";
Font font = new Font("Times New Roman", 12, RtfFontStyle.Italic | RtfFontStyle.Underline);

// ワードドキュメントに描画します
int penWidth = 0;
byte penRGB = 0;
word.FillPie(Colors.DarkRed, rc, 0, 20 f);
word.FillPie(Colors.Green, rc, 20 f, 30 f);
word.FillPie(Colors.Teal, rc, 60 f, 12 f);
word.FillPie(Colors.Orange, rc, -80 f, -20 f);
for (float startAngle = 0; startAngle < 360; startAngle += 40) {
  Color penColor = Color.FromArgb(0xff, penRGB, penRGB, penRGB);
  Pen pen = new Pen(penColor, penWidth++);
  penRGB = (byte)(penRGB + 20);
  word.DrawArc(pen, rc, startAngle, 40 f);
}
word.DrawRectangle(Colors.Red, rc);


// ベジェ曲線を表示します
var pts = new Point[] {
  new Point(400, 100), new Point(420, 130),
    new Point(500, 140), new Point(530, 120),
};

// ベジェを描画します
word.DrawBeziers(new Pen(Colors.Green, 4), pts);


// ベジェ制御点を表示します
word.DrawPolyline(Colors.Gray, pts);
foreach(Point pt in pts) {
  word.FillRectangle(Colors.Orange, pt.X - 2, pt.Y - 2, 4, 4);
}

// タイトル
word.DrawString(Strings.Bezier, font, Colors.Black, new Rect(500, 150, 100, 100));

上記のコードでは、DrawRectangle、DrawArc、DrawPolyline、および DrawBeziers メソッドを使用してさまざまなタイプのグラフィック（直線、四角形、円、ベジェなど）を描画しています。また、DrawString メソッドを使用してテキストを描画してドキュメントに表示しています。

上記のコードの出力は、次の図のようになります。