TUpDown sollte nur auf das Scrollen reagieren, wenn es den Eingabefokus besitzt.
Es reagiert auf das Scrollrad, wenn das associated control den Focus hat. Das ist richtig.
Das Problem bei mir ist aber, dass es nur eine TScrollBox, ein TImage, ein TEdit und TUpDown gibt. Es gibt also niemandem, dem ich den Focus geben könnte.
ActiveControl := nil;
Funktioniert insoweit gut.
Danke für den Tipp. Es klappt nur beim anzeigen des Fensters nicht sofort. Ich habe es bei TEdit.OnChange und bei TSubForm.OnShow eingefügt. Ich gehe davon aus, dass es bei OnShow ausgeführt wird. Allerdings wird die erste Bewegung des Scrollrades immer noch von TUpDown wahrgenommen.
Aber damit kann ich schon einmal leben!
Gruß