[WR2.0]wrSetTextFontについて

[kt]

お世話になります。

VB6
WR20

wrSetTextFontを使用してフォントのサイズが変更出来ません。
エラーは出ませんが、空白で表示されます。

wrSetObjectPropを使用すると、文字の色は変更出来ますが、サイズを変更しようとすると初期化出来ていないというエラーが出ます。

———————-
Dim WrFsiZe As WRTEXTFONTINFO

WrFsiZe.dbFontSize = 9

if wrSetTextFont(hReport, “テキスト”, WrFsiZe)・・・・

—————

という風に記述していますが
どこをﾁｪｯｸすればよいかご教示お願いします。

[伊藤＠ソフトウィング]

いつもお世話になっております。

wrSetTextFontについてですが、下記サンプルのように予めwrGetTextFontを呼び出し、試して頂けますでしょうか？

———————-
Dim WrFsiZe As WRTEXTFONTINFO

if wrGetTextFont(hReport, “テキスト”, WrFsiZe)・・・・

WrFsiZe.dbFontSize = 9

if wrSetTextFont(hReport, “テキスト”, WrFsiZe)・・・・

—————

以上、宜しくお願い致します。

[kt]

フォントサイズの変更が出来ました。
ありがとうございました！

[投稿者]

投稿