掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
入力中の文字列の取得 (ID：33588)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ゆたっぴーさん、先に紹介したところの第２７８章から第２８３章までの 「ＩＭＥの操作１〜６」を読んでみましたか？ コードはアレでも、何が出来るとかパラメータの意味とか・・・ 私は復習がてら勉強になりました。苦しんだ思い出もよみがえりましたけど 以下でいかがでしょう？Turbo Delphi Xp sp3 です。 新規で、ＥｄｉｔとＭｅｍｏをひとつづつ置きます。 ｐｒｉｖａｔｅ部に private { Private 宣言 } OldWndProc: TWndMethod; procedure WMImeComposition(var Msg: TMessage); ・・・・ implementation {$R *.dfm} uses imm; procedure TForm1.FormCreate(Sender: TObject); begin OldWndProc := Edit1.WindowProc; Edit1.WindowProc := WMImeComposition; end; procedure TForm1.WMImeComposition(var Msg: TMessage); var Imc: HIMC; L : Integer; S : String; begin OldWndProc(Msg); if ((Msg.LParam and GCS_COMPSTR) <> 0) then begin Imc := ImmGetContext(Handle); L := ImmGetCompositionString(Imc, GCS_COMPSTR, nil, 0); SetLength(S, L + 1); ImmGetCompositionString(Imc, GCS_COMPSTR, PChar(S), L + 1); ImmReleaseContext(Handle, Imc); SetLength(S, L); Memo1.Lines.Add(S); end; end; GCS_COMPSTR は第２８１章にでてますよ。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.