【質問】プログラマー用総合質問スレ【Win32】

114 ：Ｉｚ：06/10/08 22:40:28 ID:w1lEwuZc: はじめまして。
ギルドに韓国人プレイヤーが入隊したことから日韓翻訳チャットを作成中です。
ツール側テキストボックスに入力した日本語文章を外部の翻訳サイトに投げて、
返ってきたハングルの翻訳結果をUOで直接発言させようとしています。

翻訳サイトからハングルを取得する部分は完成したものの、
SendMessageWでUOクライアントに送ると文字化けしてしまいました。
（SendMessageAで日本語を発言できるのは確認しました）

For i = 1 To LenB(txtJarnal.Value) STEP 2
Call SendMessageW(wUoHand, WM_IME_CHAR, AscW(MidB(txtJarnal.Value, i, 2)), 0)
Next i
Call SendMessageA(wUoHand, WM_IME_CHAR, vbKeyReturn, 0)

何処が間違っているのか気づいた点があればご指摘願えないでしょうか？
また、ＵＯクライアントからジャーナルを取得する手法についても、教えていただけたら嬉しいです。
よろしくお願いします。

33KB