[リストへもどる]　　　[VBレスキュー(花ちゃん)]
一括表示
投稿時間：2005/08/02(Tue) 21:49
投稿者名：ぽいぽい
Ｅメール：
ＵＲＬ　：
タイトル：リッチテキストの行の高さ設定
いつもお世話になっております。
ＶＢ逆引きヘルプ一覧表410番を試させていただきました。

コピペでプロジェクトを作ったのですが、
Visual Studioの環境で実行すると動くのですが、
exeを作って実行すると落ちます。
（問題が発生したため、プロジェクトを終了する．．．といったメッセージ
　がでて、デバッグを選択すると、問題はRiched20.dllにあると出ます）

環境は、OS:WindowsXP VB6 SP6です。

開発の環境が壊れているのかと思って、
真っさらのXPにVB6SP6FULLのランタイムを入れて
みましたが、それでもexeは落ちるようです。
是非に使ってみたい機能なので、お助けいただけるとありがたいのですが。

よろしくお願いいたします。

投稿時間：2005/08/02(Tue) 22:03
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re: リッチテキストの行の高さ設定
> exeを作って実行すると落ちます。

ご迷惑をお掛けしました。
手持ちのサンプルを直した時に掲示した分の修正ができていなかったようです。
尚、P-Code コンパイルならOKのようです。

　　Ret = SendMessage(RichTextBox1.hwnd, EM_SETPARAFORMAT, 0, ByVal PF2)

上記の部分を下記に変更して見て下さい。

    Ret = SendMessage(RichTextBox1.hwnd, EM_SETPARAFORMAT, 0, PF2)

投稿時間：2005/08/02(Tue) 22:33
投稿者名：ぽいぽい
Ｅメール：
ＵＲＬ　：
タイトル：【解決→御礼】Re^2: リッチテキストの行の高さ設定
> > exeを作って実行すると落ちます。
>
> 　　Ret = SendMessage(RichTextBox1.hwnd, EM_SETPARAFORMAT, 0, ByVal PF2)
>
> 上記の部分を下記に変更して見て下さい。
>
>     Ret = SendMessage(RichTextBox1.hwnd, EM_SETPARAFORMAT, 0, PF2)

exeで実行しても、落ちなくなりました。
一時はどうなることかと思ってしまいました。
ありがとうございました。