掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
別アプリケーションのRichTextの内容をコピーするには (ID：41925)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
この短時間にNovさん、XRayさんありがとうございます。 お二方のコードがあれば別アプリのRichEditからのコピーも貼り付けもOKになります。 Novさんのコードをまず試しました。 DLL側のfunction AHookProc内、 下記★位置のwParamが0になってしまい、コピーしましたと表示されるものの、 rtfがないのでエラーになってしまいます。 if (PMsg(lP).message=MsgID) then begin if (PMsg(lP).wParam<>0) then begin ★ マルっとコピーで、 変更したところは下記の2点のみ。 ・AHookProcの'RichEdTest'を呼び出し元のフォーム名に。 ・GlobalAddAtom(PWideChar(ExtractFilePath(ParamStr(0))));をPCharに。 wParamが0になってしまう原因は何が考えられますか？ お忙しいところお手数をおかけしますがヒントいただけたら助かります。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.