Dim strm As System.IO.Stream = System.IO.File.OpenWrite("test.pdf")
Dim doc As GrapeCity.PDF.Document = New GrapeCity.PDF.Document()
Dim resourceMan As GrapeCity.PDF.Objects.ResourceManager = doc.Resources
resourceMan.EmbedFonts = New String() { "MS UI Gothic", "Arial" }
Dim page As GrapeCity.PDF.Objects.PageObject = doc.Pages.CreatePage()
Dim g As GrapeCity.PDF.Drawing.Graphics = page.GetGraphics()
g.DrawString("新製品について", New Font("MS UI Gothic", 10), Brushes.Black, 10, 10)
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.ResourceManager resourceMan = doc.Resources;
resourceMan.EmbedFonts = new string[] { "MS UI Gothic", "Arial" };
GrapeCity.PDF.Objects.PageObject page = doc.Pages.CreatePage();
GrapeCity.PDF.Drawing.Graphics g = page.GetGraphics();
g.DrawString("新製品について", new Font("MS UI Gothic", 10), Brushes.Black, 10, 10);
GrapeCity.PDF.Writer.Write(doc, strm);
strm.Close();