Print

Please login or register.
1 Hour 1 Day 1 Week 1 Month Forever
Login with username, password and session length

[TheDerman]

Hello,

I'm trying to make volume sliders in a window, and I'm wondering how to make a button or static control dragable?

The way I did it for a torn note puzzle was to have a loop on "LeftClick" which positioned the note pieces wherever the mouse cursor was, and then on "LeftRelease" locked them into a position.

I was thinking I would make my volume sliders in a similar way, but the difference is the torn note was in a scene, whereas my volume sliders are in a window.

So, can button or static controls have LeftClick and LeftRelease handlers somehow - maybe in their own scripts? I haven't come across this, as normally the window has a script, and it's just on "ButtonName" to do something, but I don't see how I could do what I want, with just that.

Thanks.

[Mnemonic]

So, can button or static controls have LeftClick and LeftRelease handlers somehow - maybe in their own scripts?

Yeah, buttons can. Static controls are not suitable, because they're not "clickable". Use buttons for sliders.

[TheDerman]

Thanks. 

So, do I link the button to a script in the button definition, and then in that button script, put on "LeftClick" etc, as I would with a scene entity?

[sychron]

Define a variable to define wether you are dragging. Set it to true on LeftClick, and to false on LeftRelease. Then, add a handler for mouse movement which adjusts the button position when the dragging variable is set to true.

[TheDerman]

Thanks. 

I can do the dragging bit though, as I don't see it being any different to how I dragged around the pieces of paper in my torn note puzzle. I'm just asking about linking scripts to buttons, and where the "LeftClick" etc goes in relation to a button, as I've never done that before. I've only done it with with scene entities, not window buttons.

[sychron]

Attach a script to the slider button and add handlers for LeftClick and LeftRelease. The release handler should also do the volume setting.

[TheDerman]

Thanks. My sliders are now working perfectly. 

I actually set the volume in the loop that controls the slider, as I have a percentage display for the volume as well, which is updated as you move the slider back and forth.

[maze]

Hi Derman,
just at the moment i'll need a slider too. It would be nice (and save my time), if you post your loop script. 
Thanks

[TheDerman]

here you go:

Code: WME Script

1. #include "scripts\base.inc"
2.  
3. global IsDragging;
4.  
5. ////////////////////////////////////////////////////////////////////////////////
6. on "LeftClick"
7. {
8.  IsDragging = true;
9.  
10.  while(IsDragging)
11.   {
12.    while(IsDragging && Game.MouseX>516 && Game.MouseX<618)
13.     {
14.      this.X = Game.MouseX;
15.          Game.SetGlobalMusicVolume(this.X-517);
16.      Sleep(1);
17.         }
18.    Sleep(1);
19.   }
20. }
21.  
22. ////////////////////////////////////////////////////////////////////////////////
23. on "LeftRelease"
24. {
25.  IsDragging = false;
26. }
27.  

This goes in the script for the music slider BUTTON. It creates a dragable area which is 100 pixels wide, which relates directly the the 0-100% range of the volume. You also need to put a LeftRelease handler on the actual window script and set IsDragging=false; in there so that releasing the left mouse button always stops the slider BUTTON dragging, no matter where you release the left mouse button.

Also, as with any script, it might not work perfectly for what you personally want to do. 

[maze]

Sure, but it brought me on the right way.

Many thanks!

[sychron]

I would replace the inner while with an if and delete the inner sleep (sounds cool ...) -- or do you have to use while there for any special reason?

[TheDerman]

Actually, maybe you are right. 

But anyway - it works fine - so I'll just leave it.

[TheDerman]

Ok, I deleted the inner while and sleep (that DOES sound cool  ), and it works the exact say way, so if anyone is interested:

Code: WME Script

1. #include "scripts\base.inc"
2.  
3. global IsDragging;
4.  
5. ////////////////////////////////////////////////////////////////////////////////
6. on "LeftClick"
7. {
8.  IsDragging = true;
9.  
10.  while(IsDragging)
11.   {
12.    if(Game.MouseX>516 && Game.MouseX<618)
13.     {
14.      this.X = Game.MouseX;
15.          Game.SetGlobalMusicVolume(this.X-517);
16.         }
17.    Sleep(1);
18.   }
19. }
20.  
21. ////////////////////////////////////////////////////////////////////////////////
22. on "LeftRelease"
23. {
24.  IsDragging = false;
25. }
26.  

[Mnemonic]

Much better.
I found an old slider.script on FTP, which does basically the same, but takes the window position into account.
http://dead-code.org/download/slider.script

[rkitting]

I have tried this and for some reason I never come into the "LeftRelease" Event and it keeps scrolling the button after releasing. Also the button doesn't stay under the mouse cursor. Anyone have a clue why this could be happening?