MESCIUS PlusPak for Windows Forms 12.0J > PlusPakの使い方 > データ出力 > PDFライブラリ > 図形の描画 |
Dim strm As System.IO.Stream = System.IO.File.OpenWrite("test.pdf") Dim doc As GrapeCity.PDF.Document = New GrapeCity.PDF.Document() Dim page As GrapeCity.PDF.Objects.PageObject = doc.Pages.CreatePage() Dim g As GrapeCity.PDF.Drawing.Graphics = page.GetGraphics() g.DrawRectangle(Pens.Blue, 10, 10, 200, 200) GrapeCity.PDF.Writer.Write(doc, strm) strm.Close()
System.IO.Stream strm = (System.IO.Stream)System.IO.File.OpenWrite("test.pdf"); GrapeCity.PDF.Document doc = new GrapeCity.PDF.Document(); GrapeCity.PDF.Objects.PageObject page = doc.Pages.CreatePage(); GrapeCity.PDF.Drawing.Graphics g = page.GetGraphics(); g.DrawRectangle(Pens.Blue, 10, 10, 200, 200); GrapeCity.PDF.Writer.Write(doc, strm); strm.Close();
Dim strm As System.IO.Stream = System.IO.File.OpenWrite("test.pdf") Dim doc As GrapeCity.PDF.Document = New GrapeCity.PDF.Document() Dim page As GrapeCity.PDF.Objects.PageObject = doc.Pages.CreatePage() Dim g As GrapeCity.PDF.Drawing.Graphics = page.GetGraphics() g.DrawEllipse(Pens.Red, 10, 10, 200, 200) GrapeCity.PDF.Writer.Write(doc, strm) strm.Close()
System.IO.Stream strm = (System.IO.Stream)System.IO.File.OpenWrite("test.pdf"); GrapeCity.PDF.Document doc = new GrapeCity.PDF.Document(); GrapeCity.PDF.Objects.PageObject page = doc.Pages.CreatePage(); GrapeCity.PDF.Drawing.Graphics g = page.GetGraphics(); g.DrawEllipse(Pens.Red, 10, 10, 200, 200); GrapeCity.PDF.Writer.Write(doc, strm); strm.Close();