delphi - TCustomControl の子孫で Tab キーを処理するには?

Question

TCustomControl の子孫があり、ユーザーが押したときに Tab キーを処理したいと考えています。しかし、Tab キーを押すと、フォーム上のフォーカスされたコントロールが変更されました。また、OnKeyDown および OnKeyPress イベントは発生しませんでした。問題を解決するには？

Answer 1

フラグWM_GETDLGCODEを返すことができるように、コンポーネントにメッセージを処理させます。例については、この質問DLGC_WANTTABへの回答を参照してください。