掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
comboboxをマウスホイールから開放する方法 (ID:41422)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
例えば次のコードは，Form1にある ScrollBox1のスクロールを禁止する例です． イベントの引数が何故定義してあるのかを考えてみると，プログラミングの幅が広がると思いますよ． procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); var SB : TScrollingWinControl; begin SB := Form1.ScrollBox1; if FindVCLWindow(MousePos) = SB then Handled := False; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.