掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TMemo使用時のフォーカス変更 (ID:973)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
初めまして、アスカといいます。 早速、質問させて頂きます。 現在、フォーム上にMemoを４つ配置しております。 そのMemo1にフォーカスがある時に↑↓キーでフォーカスを 他のMemo2,3,4に移したいのですが、うまくいきません。 （Memoは、１行入力用として使用しています。） 現在は、OnKeyDown内で下記のように記述しております。 procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = 40 then begin Memo2.SetFocus; end; end; こうすると、↑↓キーではフォーカスが移ってくれません。 試しに、OnKeyUp内で記述するとうまくいくのですが、 キーが押されたときにフォーカスを移したいのです。 Editを使用すればうまくいくのですが、Editを使用したくない 訳がありますので、Memoでフォーカスを移す方法をご教授ください。 よろしくお願いいたします。 アスカ
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.