2 Fragen zu Autoscroll

In VB.NET 2003 (Windows Forms) wird das automatische Scrollen eines Steuerelements mit `AutoScroll = True` standardmäßig durch die System-Scrollbars gesteuert. Die Schrittweite, mit der beim Klicken auf die Pfeile oder beim Drücken der Pfeiltasten gescrollt wird, ist durch die Eigenschaft `ScrollSmallChange` (bzw. `SmallChange` bei Scrollbars) festgelegt. Allerdings bietet das `Panel`-Steuerelement in .NET 1.1 (also auch in VB.NET 2003) **keine öffentliche Eigenschaft**, um die Scroll-Schrittweite direkt zu ändern. **Möglichkeiten:** 1. **Eigene Scroll-Logik implementieren:** Du kannst das Scrollen programmatisch steuern, indem du die `AutoScrollPosition`-Eigenschaft des Panels selbst setzt. Beispiel: ```vb ' Angenommen, Panel1 ist dein Scroll-Panel Dim scrollStep As Integer = 20 ' gewünschte Schrittweite in Pixeln ' Nach unten scrollen Panel1.AutoScrollPosition = New Point(Panel1.AutoScrollPosition.X, -Panel1.AutoScrollPosition.Y + scrollStep) ' Nach oben scrollen Panel1.AutoScrollPosition = New Point(Panel1.AutoScrollPosition.X, -Panel1.AutoScrollPosition.Y - scrollStep) ``` Beachte das Minuszeichen: Die Y-Koordinate von `AutoScrollPosition` ist immer negativ, wenn gescrollt wurde. 2. **Eigene Scrollbars verwenden:** Wenn du volle Kontrolle über die Schrittweite möchtest, kannst du eigene `VScrollBar`- oder `HScrollBar`-Steuerelemente verwenden und deren `SmallChange`-Eigenschaft setzen. Dann musst du das Scrollen aber komplett selbst verwalten. 3. **System-Scrollbars (Panel) anpassen:** In .NET 1.1 gibt es **keine** Möglichkeit, die Schrittweite der eingebauten Scrollbars eines Panels direkt zu ändern. Erst ab .NET 2.0 gibt es die Möglichkeit, über das `Scroll`-Event und die `ScrollEventArgs` darauf Einfluss zu nehmen. **Fazit:** In VB.NET 2003 kannst du die Schrittweite beim app-gesteuerten Scrollen nur beeinflussen, indem du die `AutoScrollPosition`-Eigenschaft selbst setzt. Die Schrittweite der eingebauten Scrollbars (bei Benutzereingaben) ist nicht direkt änderbar. **Weitere Infos:** - [Microsoft Docs: Panel.AutoScrollPosition](https://learn.microsoft.com/en-us/dotnet/api/system.windows.forms.scrollablecontrol.autoscrollposition) - [Microsoft Docs: VScrollBar.SmallChange](https://learn.microsoft.com/en-us/dotnet/api/system.windows.forms.scrollbar.smallchange) Falls du ein Beispiel für eine bestimmte Scrollrichtung oder ein bestimmtes Szenario brauchst, bitte die Frage entsprechend präzisieren.

In VB.NET 2003 (also .NET Framework 1.1) ist das Verhalten des `Panel`-Steuerelements mit aktiviertem `AutoScroll` so ausgelegt, dass beim Scrollen immer der gesamte Inhalt des Panels sichtbar gemacht werden kann – also alles, was sich innerhalb der `Controls`-Sammlung und außerhalb des sichtbaren Bereichs befindet. Eine direkte Möglichkeit, das Standard-Scrolling so zu manipulieren, dass **nur ein Teil** des Inhalts gescrollt werden kann und der Rest dauerhaft verborgen bleibt, gibt es nicht. Das Panel-Scrolling bezieht sich immer auf den gesamten Inhalt. **Mögliche Workarounds:** 1. **Zwei Panels verwenden:** Teile den Inhalt auf zwei Panels auf – einen sichtbaren, scrollbaren Bereich und einen verborgenen Bereich (z.B. ein Panel außerhalb des sichtbaren Bereichs oder mit `Visible = False`). Nur der sichtbare Teil wird gescrollt. 2. **Custom Panel ableiten:** Erstelle eine eigene Panel-Klasse, die das Scrollverhalten überschreibt. In .NET 1.1 ist das allerdings recht aufwändig, da viele Scroll-Mechanismen intern ablaufen. Du könntest aber z.B. im `OnPaint`-Event oder durch gezieltes Verschieben von Controls das gewünschte Verhalten nachbilden. 3. **Controls dynamisch ein-/ausblenden:** Blende Controls, die nicht gescrollt werden sollen, einfach aus (`Visible = False`), solange sie nicht sichtbar sein sollen. So werden sie vom AutoScroll-Mechanismus ignoriert. **Beispiel für Variante 3:** ```vb ' Angenommen, Panel1 enthält mehrere Controls For Each ctrl As Control In Panel1.Controls If ctrl.Top > 200 Then ' z.B. alles unterhalb von 200px soll verborgen bleiben ctrl.Visible = False Else ctrl.Visible = True End If Next ``` **Fazit:** Das Standard-Panel in VB.NET 2003 bietet keine eingebaute Möglichkeit, das Scrollen auf einen Teilbereich zu beschränken. Du musst mit Workarounds wie Aufteilen, Ein-/Ausblenden oder einer eigenen Panel-Implementierung arbeiten. Weitere Infos zum Panel-Control: [Microsoft Docs: Panel.AutoScroll Property](https://learn.microsoft.com/en-us/dotnet/api/system.windows.forms.panel.autoscroll?view=netframework-1.1)