Delphi6のForm1のイベントで、
OnMouseWheelUP Down の処理内容を例えばButton1Clickとすると、
ボタン１を２回クリックしたことになってしまいます。
これを１回クリックというようにできないでしょうか？