delphi - ベースフォームコントロールにフォーカスを設定し、mdichild に戻った後の mdichild でのマウスホイールの問題

Question

Hi Today I encountered a new problem with MouseWheel I have written some codes in mousewheel event of my mdichild forms , when I open new mdichild form and select it and do mousewheel , it detects the event but when I click on a control on my base form and comeback to mdichild and use mouse wheel, mousewheel event is not triggered anymore unless I set focus on another MDIChildform and come back to the childform again . Please help me solve the problem Thanks

here is a sample of this problem which is a little modification on default MDIAPP template http://egmahdi.com/mdiApptemplate.rar

Answer 1

こんにちは、この問題に対する別の非常に簡単な答えもあります。mdichildform にコントロールがあり、このコントロールをクリックすると、すべて問題ないことに気付きました。そのため、mdichildform に TButton を配置し、form.mousedown イベントに button1.setfocus を追加しました。これですべて問題ありません。ボタンを -200 、 -200 に移動したため、ボタンは表示されません。実際には、フォームに他のコントロールはなく、フォームにペイントするだけです。