Scrollleiste

Übersicht

BlitzBasic

BlitzPlus

	TimBo Betreff: Scrollleiste	So, Aug 22, 2010 8:35 Antworten mit Zitat
Hi, ich komme mal wieder nicht weiter . aber ich bekomme es einfach nicht hin, ein Fenster mit einer Scrollleiste zu versehen. Ein Beispiel: man hat eine Fenstergröße von 800x600 und will viele Textfelder untereinandersetzen , verschiedene Tools in dieses Fenster einbinden, und dann sollte man auch nach unten scrollen können. Ist das prinzipiell möglich ? Vielen Dank schonmal TimBo
mfg Tim Borowski // CPU: Ryzen 2700x GPU: Nvidia RTX 2070 OC (Gigabyte) Ram: 16GB DDR4 @ 3000MHz OS: Windows 10 Stolzer Gewinner des BCC 25 & BCC 31 hat einen ersten Preis in der 1. Runde beim BWInf 2010/2011 & 2011/12 mit BlitzBasic erreicht.

TimBo

Betreff: Scrollleiste

So, Aug 22, 2010 8:35
Antworten mit Zitat

Hi,

ich komme mal wieder nicht weiter Rolling Eyes

.
aber ich bekomme es einfach nicht hin, ein Fenster mit einer Scrollleiste zu versehen.

Ein Beispiel:
man hat eine Fenstergröße von 800x600 und will viele Textfelder untereinandersetzen , verschiedene Tools in dieses Fenster einbinden, und dann sollte man auch nach unten scrollen können.

Ist das prinzipiell möglich ?

Vielen Dank schonmal
TimBo

mfg Tim Borowski // CPU: Ryzen 2700x GPU: Nvidia RTX 2070 OC (Gigabyte) Ram: 16GB DDR4 @ 3000MHz OS: Windows 10
Stolzer Gewinner des BCC 25 & BCC 31
hat einen ersten Preis in der 1. Runde beim BWInf 2010/2011 & 2011/12 mit BlitzBasic erreicht.

	BB-Freak	So, Aug 22, 2010 13:32 Antworten mit Zitat
ich bin zwar nach nicht so erfahren aber es müsste gehen . du zeigst die tools doch wahrscheinlich mit text an dann kannst du doch die x Coordienaten verschieben und wenn sie zu hoch sind kannst du die anzeige ja verhindern. Andersrum kannst du das auch machen das feld auf das du mit der Maus klicken willst musst du natürlich auch verschieben oder nicht mehr möglich machen(falls sie "weg" sind. hoff mal das es hilft. wen du so ein scroll bar machen wilst kannste in ja per rect zeichnen und dann die y-coordinaten verschieben wenn die maus getrückt ist und nach unten/oben verschoben wird. man muss in natürlich auch stoppen . Könnte ein weilchen dauern bis das fertig ist aber all zu schwierig wirds net ^^.

BB-Freak

So, Aug 22, 2010 13:32
Antworten mit Zitat

ich bin zwar nach nicht so erfahren aber es müsste gehen Very Happy

.
du zeigst die tools doch wahrscheinlich mit text an dann kannst du doch die x Coordienaten verschieben und wenn sie zu hoch sind kannst du die anzeige ja verhindern. Andersrum kannst du das auch machen das feld auf das du mit der Maus klicken willst musst du natürlich auch verschieben oder nicht mehr möglich machen(falls sie "weg" sind.

hoff mal das es hilft.

wen du so ein scroll bar machen wilst kannste in ja per rect zeichnen und dann die y-coordinaten verschieben wenn die maus getrückt ist und nach unten/oben verschoben wird. man muss in natürlich auch stoppen Rolling Eyes

. Könnte ein weilchen dauern bis das fertig ist aber all zu schwierig wirds net ^^.

	ozzi789	So, Aug 22, 2010 13:38 Antworten mit Zitat
Code: [AUSKLAPPEN] [EINKLAPPEN] window = CreateWindow ("Window", 0, 0, 300, 300, 0, 1) x = ClientWidth (window) y = ClientHeight(window) slidery = CreateSlider (x - 16, 0, 16, y - 16, window, 2) SetSliderRange slidery, 10, 30 textarea = CreateTextArea(10, 10, 260, 200, window) Repeat If KeyHit (1) = 1 Then End SetGadgetShape textarea,0,SliderValue(slidery)*10,260,200 Forever
0x2B \|\| ! 0x2B C# \| C++13 \| Java 7 \| PHP 5

ozzi789

So, Aug 22, 2010 13:38
Antworten mit Zitat

Code: [AUSKLAPPEN]

window = CreateWindow ("Window", 0, 0, 300, 300, 0, 1)
x = ClientWidth (window)
y = ClientHeight(window)

slidery = CreateSlider (x - 16, 0, 16, y - 16, window, 2)
SetSliderRange slidery, 10, 30

textarea = CreateTextArea(10, 10, 260, 200, window)

Repeat
If KeyHit (1) = 1 Then End
SetGadgetShape textarea,0,SliderValue(slidery)*10,260,200

Forever

0x2B || ! 0x2B
C# | C++13 | Java 7 | PHP 5

	Thunder	So, Aug 22, 2010 21:10 Antworten mit Zitat
Es wird sinnvoll sein die scrollbaren Gadgets an ein Panel anzufügen und das dann so zu verschieben, wie es ozzi789 mit der TextArea demonstriert hat. Ich würde SetGadgetShape nur ausführen, wenn das Event-System ein EventID()=$401 mit EventSource()=Slider meldet. mfg Thunder
Meine Sachen: https://bitbucket.org/chtisgit https://github.com/chtisgit

Thunder

So, Aug 22, 2010 21:10
Antworten mit Zitat

Es wird sinnvoll sein die scrollbaren Gadgets an ein Panel anzufügen und das dann so zu verschieben, wie es ozzi789 mit der TextArea demonstriert hat. Ich würde SetGadgetShape nur ausführen, wenn das Event-System ein EventID()=$401 mit EventSource()=Slider meldet.

mfg Thunder

Meine Sachen: https://bitbucket.org/chtisgit https://github.com/chtisgit

	TimBo	So, Aug 22, 2010 21:13 Antworten mit Zitat
danke für die Tipps, SetGadgetShape war die Schlüsselanweisung. EventID()=$401 mit EventSource()=Slider ist dann noch die Feinheit. Vielen Dank !! mfg TimBo
mfg Tim Borowski // CPU: Ryzen 2700x GPU: Nvidia RTX 2070 OC (Gigabyte) Ram: 16GB DDR4 @ 3000MHz OS: Windows 10 Stolzer Gewinner des BCC 25 & BCC 31 hat einen ersten Preis in der 1. Runde beim BWInf 2010/2011 & 2011/12 mit BlitzBasic erreicht.

TimBo

So, Aug 22, 2010 21:13
Antworten mit Zitat

danke für die Tipps,

SetGadgetShape war die Schlüsselanweisung.

EventID()=$401 mit EventSource()=Slider
ist dann noch die Feinheit.

Vielen Dank !!
mfg
TimBo