DOBON.NETプログラミング掲示板過去ログ
itextによるフォントサイズの縦横比の変更
題名: itextによるフォントサイズの縦横比の変更
著者: ヒラ
日時: 2008/02/25 18:28:03
ID: 21503
この記事の返信元:
(なし)
この記事への返信:
(なし)
ツリーを表示
環境/言語:[WindowsXP VB.net]
分類:[.NET]
現在VB.netでitextを使ってPDFファイルを作成するプログラムを作成しています。
フォントの縦と横の比率を変化させるさせたいと思っています。
ずっと調べているのですが、いい方法が見つかりません。(縦長のフォントにしたい。)
どなたかよい方法をご存知ないでしょうか?
なお、フォントの比率を変化させていないソースは以下のようにしています。
Dim Document As New Document
Dim Writer As PdfWriter = PdfWriter.getInstance(Document, New FileOutputStream("Chap0112.pdf"))
Dim pageNum As Integer
Document.open()
Dim cb As PdfContentByte = Writer.getDirectContent()
Document.setPageSize(PageSize.A4)
Document.newPage()
Dim bf As BaseFont
bf = BaseFont.createFont("c:\WINDOWS\fonts\msmin04.ttc,1", BaseFont.IDENTITY_H, BaseFont.EMBEDDED)
cb.beginText()
cb.setFontAndSize(bf, 20)
cb.showTextAligned(PdfContentByte.ALIGN_LEFT, "こんにちは", 100, 100, 0)
cb.endText()
Document.close()
よろしくお願いします。
DOBON.NET
|
プログラミング道
|
プログラミング掲示板
分類:[.NET]
現在VB.netでitextを使ってPDFファイルを作成するプログラムを作成しています。
フォントの縦と横の比率を変化させるさせたいと思っています。
ずっと調べているのですが、いい方法が見つかりません。(縦長のフォントにしたい。)
どなたかよい方法をご存知ないでしょうか?
なお、フォントの比率を変化させていないソースは以下のようにしています。
Dim Document As New Document
Dim Writer As PdfWriter = PdfWriter.getInstance(Document, New FileOutputStream("Chap0112.pdf"))
Dim pageNum As Integer
Document.open()
Dim cb As PdfContentByte = Writer.getDirectContent()
Document.setPageSize(PageSize.A4)
Document.newPage()
Dim bf As BaseFont
bf = BaseFont.createFont("c:\WINDOWS\fonts\msmin04.ttc,1", BaseFont.IDENTITY_H, BaseFont.EMBEDDED)
cb.beginText()
cb.setFontAndSize(bf, 20)
cb.showTextAligned(PdfContentByte.ALIGN_LEFT, "こんにちは", 100, 100, 0)
cb.endText()
Document.close()
よろしくお願いします。