掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
別アプリケーションのRichTextの内容をコピーするには (ID:41954)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
解決した後ですが、もうひとつ。 DLL内でFindWindowするとき'TargetForm'(取得元ウィンドウ),'RichEdTest'(貼り付け先ウィンドウ)と固定値になっているのを 汎用性をもたせたく、StartHKに引数追加して渡してみたんですが、 文字が貼り付けられません。 呼び出し側 StartHk(Pchar('TargetForm'),PChar('RichEdTest')); DLL側 var FTargetWindowName:string; FSendWindowName:string; function StartHk(ATargetWindowName,ASendWindowName:PChar): HHOOK; stdcall; begin FTargetWindowName := ATargetWindowName; FSendWindowName := ASendWindowName; hTarget := FindWindow(nil,PChar(FTargetWindowName)); dwThread := GetWindowThreadProcessId(hTarget);//TargetForm if dwThread=0 then Result := 0 else Result := SetWindowsHookEx(WH_GETMESSAGE, Addr(AHookProc), HInstance, dwThread); end; 何かやり方間違っていますでしょうか?
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.