タイトル : Re^4: 転送データが表示されない理由につきまして 投稿日 : 2008/01/11(Fri) 18:28 投稿者 : sinkai
花ちゃん さん 度々、申し訳ありませんでした。 >Word のハンドルを取得している部分やアクティブにする部分も必要でしょう。 特に親ウインドウのハンドル、アクティブしないで転送できました。 メモ帳、ワードパット、その他で転送確認もできています。 >タイトルを書き変えたいのですか? >それともWordの文書を書きたいのですか? はい、Wordの文書を書きたいです。 Word以外では文書の転送で書き換えができています。 メモ帳にデータが転送"test"できましたので下記に記述しました。 ChildhWndのハンドルを変更するだけでワードパットでも確認できました。 メモ帳・・・クラス名Editのハンドル(ChildhWnd) '------------------------------------------------------------------------ ' Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hWnd As Long, _ ByVal wMsg As Long, _ ByVal wParam As Long, _ lParam As Any) As Long Private Sub Form_Load() Ret = SendMessage(ChildhWnd, &HC, 0, ByVal "test") End Sub '------------------------------------------------------------------------ ' コードの事を記述と思っていましたが、もし謝っていましたら大変申し訳ありませんでした。 |