Scrollbar
lima-city → Forum → Programmiersprachen → Basic
anzahl
beispiel
bestimmten punkt
division
eigenschaft
ereignis
fenster
fixieren
folgendes nutzen
form
genutzt nutze
gewissen punkt
klappen
nachdenken
objekt
passen
pixel
prinzip
problem
setzen
-
Hi,
also ich will eine Scrollbar mit VB 6 einbinden, jedoch weis ich nicht wie dies gehen soll.
Bitte um erkl?rung!
Danke schon mal -
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage
-
Da gabs doch irgendwas in den Eigenschaften von Texten mit dem man das einschaltet(tschuldigung, hab l?nger kein VB mehr genutzt, nutze jetz C).
Also wenn es um Scrollleisten in Text oder anderen Feldern geht gibts da ne Funktion, bei Scrolleisten f?rs ganze Fenster musste wohl was anderes machen-
- Alien -
ich brauch f?rs ganze fenster bzw. nur f?r einen frame!!
-
Hallo!
Zum Beispiel f?r einen Frame kannst du folgendes nutzen:
In dem Change-Ereignis des Scroll Objektes (hier Vertikal Scroll):
Private Sub VScroll1_Change()
Frame1.Top = VScroll1.Value
End Sub
Die Max Eigenschaft f?r VScroll solltest du zum Beispiel auf 500 setzen und die "ScaleMode" Eigenschaft des Fensters sollte auf "3 - Pixel" stehen (damit nicht zu kleine, nicht sichtbare Schritte genutzt werden, denn twips ist mei?t 16 mal kleiner als ein Darstellungpunkt auf dem Bildschirm)
Dann sollte es schon eigentlich klappen!
M?chtest du das alles Fixieren in ein Objekt (mit Rand), dann solltest du alle Objekte zum beispiel in eine PictureBox erstellen (die ein eigenes HDC hat). Borderstyle evtl. dann auf "0 - Kein" stellen.
Meme -
also des funktioniert zwar aber nur bis zu einem bestimmten punkt!,
das problem f?r mich ist das die scrollbar zu klein ist! es passen nur 90 eintr?ge rein und ich ben?tige mehr um die 1000 und mehr falls des jemand versteht! -
Ich gebe dir ein Beispiel anhand eines Scrollbars f?rs Fenster, wenn ein Frame, das gr??er als die Form ist, gescrollt werden soll - in diesem Beispiel rein vertikal. Musst halt erg?nzen, wenn horizontal auch dabei sein soll - ist aber selbes Prinzip
Private Sub Form_Resize()
If Frame1.Height < Me.ScaleHeight Then
VScroll1.Visible = False
Else
With VScroll1
.Visible = True
.Min = 0
.Max = Frame1.Height - Me.ScaleHeight
.Top = 0
.Left = Me.ScaleWidth - .Width
.Height = Me.ScaleHeight
.Refresh
End With
End If
End Sub
Private Sub VScroll1_Change()
Frame1.Top = -VScroll1.Value
End Sub
Private Sub VScroll1_Scroll()
VScroll1_Change
End Sub
greetz
Mario -
das h?rt sich zwar gut an aber wenn du:
Frame1.Height auf 100000 setzt gibt es ein programmabsturz wegen ?berlauf!
Das Problem ist das VScroll1.Max maximal 32767 betragen kann!!! und das ist mien problem! deshalb st des nur bis zu einem gewissen punkt m?glich zu scrollen!
geht es auch anders zu scrollen?
Bitte ist sehr wichtig! -
?rg ist doch nit so schwer!
Dividiere einfach die Height.Zahl solange durch 2 bis du unter 32000 bist.
Dann z?hlst du die anzahl der divisionen und beim scollereignis der scollbar z?hlst du nen Z?hler rauf oder runter und scrollst nur noch dann einen teil weiter wenn der Z?hler die anzahl erreicht.
Mit nen bissl nachdenken verstehste das schon.
-
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage