Ausgabe des Slider- Wertes

[cygnus]

Hallo,

ich möchte den Wert der Sliderstellung (lb1.Text) als xl bzw. xl$ weiterverarbeiten, ohne über Label lb1 anzuzeigen. Ist mir nicht gelungen - ist das überhaupt möglich? Falls nicht - läßt sich die Farb- Darstellung ändern, ohne die Systemfarben zu verändern? Das Erste wär mir lieber...


Gruß,
Michael

EDIT:
Sorry, wrong placed thread...

I would like to use the slider- value with own variables and screen positions. Is it possible? Displaying the values in system-colors is not really an option...

Global Currency xl
Global xl$
OpenW Center Client3D # 1, , , 425, 60, 0
Me.BackColor = RGB(160, 160, 160)
°
Ocx Slider sl1 = "XLinks", 10, 30, 400, 20
sl1.BorderStyle = basFixedSingle
sl1.SelectRange = True
sl1.Min = -10
sl1.Max = 10
sl1.TickStyle = 0
sl1.TickFrequency = 10
°
Ocx Label lb01 = " Value:", 335, 5, 40, 20
.Appearance = 6
°
Ocx Label lb1 = Str$(sl1.Value), 375, 5, 35, 20
.Appearance = 1
°
Color  RGB(0, 240, 160), 0
°xl$ = Str(sl1.Value)
xl$ = lb1.Text
DrawText 10, 5, 50, 20, xl$, DT_VCENTER
°
Local  i
KeyGet i
End
°
Do
 Sleep
Loop Until Me Is Nothing
°
Sub sl1_Scroll
 lb1.Text = Str$(sl1.Value)
Sub sl1_Change
 lb1.Text = Str$(sl1.Value)
 


[cygnus]

Not really...please have a look at the code:
The value while moving the slider is given by "lb1.Text=Str$(sl1.Value" in the Sub. Please try this stand-alone program. It's taken in parts from the GfA-Help.

I would like to copy that Value into my own var to evaluate while moving the slider. I did not find any possibility using my own var like "xl$" or similar...I've tried a lot of variations...

I surmise I have to create my own slider...I like to create own things but sometimes it's easier to use system controls.

[cygnus]

It works - thanks a lot.

Where can I get such details...You see, I didn't use API/Controls yet...

[scalion]

You have api doc in C:\Program Files (x86)\GB32\Doc
The file name is Apifunc.pdf
But i think you must read also Objects.pdf in the same name.
Still in the same directory: You can find more details in Win32API-1.pdf to Win32API-4.pdf .
Hope you can read dutch docs else you must use google translator.

[cygnus]

Thanks, I will try...Hmmm...just some words or sentences are to understand.
But I have just installed the API-Guide 3.7. Much to read...

[dragonjim]

Hi Cygnus,

For information on system controls within GFABASIC32, you can download the English help file from this page.

[cygnus]

Thanks, dragonjim, I did.