ScrollBarEx - Module (all OS / DPI)

[Thorsten1867]

ScrollBarEx - Module (all OS / DPI / 64Bit)

• Anpassen der Scrollbarlänge möglich, wenn der vertikale und horizontale Scrollbar gleichzeitig angezeigt werden
• Unterstützung des Mausrades, wenn der Cursor über dem Scrollbar ist
• Automatische Größenanpassung
• Anpassung des Aussehens
• Unterstützung abgerunderter Ecken
• Volle Farbunterstützung

Code: Alles auswählen

; ScrollEx::Gadget()       - similar to ScrollBarGadget()
; ScrollEx::GetAttribute() - similar to GetGadgetAttribute()
; ScrollEx::GetData()      - similar to GetGadgetData()
; ScrollEx::GetID()        - similar to GetGadgetData(), but string instead of integer
; ScrollEx::GetState()     - similar to GetGadgetState()
; ScrollEx::Hide()         - similar to HideGadget()
; ScrollEx::SetAttribute() - similar to SetGadgetAttribute()
; ScrollEx::SetColor()     - similar to SetGadgetColor()
; ScrollEx::SetData()      - similar to SetGadgetData()
; ScrollEx::SetID()        - similar to SetGadgetData() , but string instead of integer
; ScrollEx::SetState()     - similar to SetGadgetState()

Download: ScrollBarExModule.pbi

[STARGÅTE]

Hallo Thorsten1867,

ein paar Anmerkungen von mir, die das Gadget aktuell komplett unhandlich machen:

• Das MouseWheel geht nicht, weil die #PB_Canvas_Keyboard Konstante beim erstellen deines CanvasGadget fehlt. Dadurch gibt es das Event garnicht.
• Beim Bewegen der Balken mit der Maus, darf ich den Balken mit der Maus nicht verlassen, das ist ziemlich nervig beim scrollen. Außerdem scrollt der Balken völlig anders (andere speed) als meine Maus
• Features die fehlen sind das Klicken in den Zwischenraum zum scrollen einer ganzen Page und das die beiden ScrollPfeileButtens nicht gedruckt gehalten werden können, da klickt man sich aktuell zu Tode

[Thorsten1867]

Update:

• automatisches Scrollen für die Buttons (Button gedrückt halten)
• seitenweise scrollen (Klick in den Zwischenraum)

@STARGÅTE
Das Mousewheel funktioniert bei mir problemlos, solange der Mauszeiger über dem Scrollbar ist.

[STARGÅTE]

Du bekommst hier ein Event? Ich nicht. Egal ob die Maus drin ist oder nicht.
Mit der Konstante bekomme ich das Event auch wenn das Gadget nur aktive ist, die Maus aber nicht drin ist.

Code: Alles auswählen

Enumeration
	#Window
	#Gadget
EndEnumeration

OpenWindow(#Window, 0, 0, 800, 450, "Vector Canvas Gadget", #PB_Window_MaximizeGadget|#PB_Window_MaximizeGadget|#PB_Window_SizeGadget|#PB_Window_ScreenCentered)
CanvasGadget(#Gadget, 0, 0, WindowWidth(#Window), WindowHeight(#Window));, #PB_Canvas_Keyboard)

Repeat
	Select WaitWindowEvent()
		Case #PB_Event_CloseWindow
			Break
		Case #PB_Event_Gadget
			Select EventType()
				Case #PB_EventType_MouseWheel
					Debug "#PB_EventType_MouseWheel"
			EndSelect
	EndSelect
ForEver

End

[Thorsten1867]

Ich habe die Konstante hinzugefügt. Macht bei mir keinen Unterschied.