掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
OnKeyPressイベントで２バイト文字を受け取るには？ (ID：15442)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
public OldProc: TWndMethod; procedure MemoSubClassProc(var Message: TMessage); end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin OldProc := Memo1.WindowProc; Memo1.WindowProc := MemoSubClassProc; end; procedure TForm1.MemoSubClassProc(var Message: TMessage); begin OldProc(Message); if Message.Msg = WM_IME_CHAR then Edit1.Text := Edit1.Text + Char(Message.WParamLo shr 8)+Char(Message.WParamLo); end; として Memo1 に 'あいうえお' と IME で入力して決定すると・・・
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.