名前 題名 ▼ おかぽんさん > ▼ SOさん > > コンボボックスでリストが表示されていない状態で、 > > フォーカスがあるとして、ホイールをくるくるすると、 > > コンボボックスがスクロール。。。じゃなく、別の値を選択するっていうやつ? > ドロップダウン中だけ、ホイールで動いてほしいってやつですかね? > > procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState; > WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); > begin > if ActiveControl = ComboBox1 then Handled := not ComboBox1.DroppedDown; > end; GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link