DOBON.NETプログラミング掲示板過去ログ
句読点の縦書き印刷ができない
題名: 句読点の縦書き印刷ができない
著者: miyahiro
日時: 2013/04/19 10:32:20
ID: 31483
この記事の返信元:
(なし)
この記事への返信:
[31509]
Re[1]: 句読点の縦書き印刷ができない
管理人
2013/05/07 0:37:39
ツリーを表示
環境/言語:[Visual Basic 2010]
分類:[.NET]
Visual Basic 2010 で下記のコードを実行して縦書で
プリンタ出力しています。
下記の例の場合、句読点である「。」のみが出力されません。
ただ、フォントスタイルを FontStyle.Bold にすると出力
されます。 FontStyle.Regular のままでは出力できない
のでしょうか。
Dim myText As String = "ありがとう。"
Dim font As New Font( _
"MS ゴシック", _
22, _
FontStyle.Regular, _
GraphicsUnit.Point)
Dim pointF As New PointF(40, 10)
Dim stringFormat As New StringFormat()
Dim solidBrush As New SolidBrush(Color.FromArgb(255, 0, 0, 255))
stringFormat.FormatFlags = StringFormatFlags.DirectionVertical
e.Graphics.DrawString(myText, font, solidBrush, pointF, stringFormat)
題名: Re[1]: 句読点の縦書き印刷ができない
著者: 管理人
日時: 2013/05/07 0:37:39
ID: 31509
この記事の返信元:
[31483]
句読点の縦書き印刷ができない
miyahiro
2013/04/19 10:32:20
この記事への返信:
(なし)
ツリーを表示
■No31483に返信(miyahiroさんの記事)
今更で申し訳ないのですが、私が試してみたところでは、問題なく「。」も印刷されました。プリンターによって印刷されないこともあるのでしょうか。
DOBON.NET
|
プログラミング道
|
プログラミング掲示板
分類:[.NET]
Visual Basic 2010 で下記のコードを実行して縦書で
プリンタ出力しています。
下記の例の場合、句読点である「。」のみが出力されません。
ただ、フォントスタイルを FontStyle.Bold にすると出力
されます。 FontStyle.Regular のままでは出力できない
のでしょうか。
Dim myText As String = "ありがとう。"
Dim font As New Font( _
"MS ゴシック", _
22, _
FontStyle.Regular, _
GraphicsUnit.Point)
Dim pointF As New PointF(40, 10)
Dim stringFormat As New StringFormat()
Dim solidBrush As New SolidBrush(Color.FromArgb(255, 0, 0, 255))
stringFormat.FormatFlags = StringFormatFlags.DirectionVertical
e.Graphics.DrawString(myText, font, solidBrush, pointF, stringFormat)