>>>>Perfect! Thanks
>>>>
>>>>
>>>>>>I'm working on a slider control:
>>>>>>http://www.geocities.com/kevin.marois/slider/dragdrop1.jpg
>>>>>>
>>>>>>I can't seem to get the thumb to work right.
>>>>>>
>>>>>>See this:
>>>>>>http://www.geocities.com/kevin.marois/slider/test.zip
>>>>>>
>>>>>>Anyone know how to go about this?
>>>>>
>>>>>
>>>>>Hi Kevin,
>>>>>
>>>>>Great Idea !
>>>>>
>>>>>Just replace the code you have in your MouseMove() event from the CommandButton inside the container with the code below:
>>>>>
>>>>>
>>>>>

LPARAMETERS nButton, nShift, nXCoord, nYCoord
>>>>>
>>>>>IF nButton <> 1
>>>>>	RETURN
>>>>>ENDIF
>>>>>
>>>>>
>>>>>IF nXCoord <= This.Parent.Left
>>>>>	nXCoord = This.Parent.Left
>>>>>ENDIF
>>>>>
>>>>>IF nXCoord >= This.Parent.Left + This.Parent.Width - This.Width
>>>>>	nXCoord = This.Parent.Left + This.Parent.Width - This.Width
>>>>>ENDIF
>>>>>
>>>>>This.Left = nXCoord - This.Parent.Left
>>>>>
>>>>>RETURN

>>>>>
>>>>>
>>>>>Hope this helps
>>>>>
>>>>>Cesar
>>>
>>>
>>>Cool !
>>>I went further:
>>>
>>>1 - In INIT() of the CommandButton, add:
>>>
>>>

This.AddProperty("xOffSet", 0)
>>>This.AddProperty("Value", 0)

>>>
>>>
>>>2 - In MOUSEDOWN() event of the CmdButton:
>>>
>>>

LPARAMETERS nButton, nShift, nXCoord, nYCoord
>>>
>>>IF nButton = 1
>>>	This.xOffSet = (nXCoord - This.Parent.Left) - This.Left
>>>ENDIF

>>>
>>>
>>>
>>>3 - In MOUSEMOVE() of the CmdButton, add:
>>>
>>>

LPARAMETERS nButton, nShift, nXCoord, nYCoord
>>>
>>>IF nButton <> 1
>>>	RETURN
>>>ENDIF
>>>
>>>IF nXCoord <= This.Parent.Left + This.xOffSet
>>>	nXCoord = This.Parent.Left + This.xOffSet
>>>ENDIF
>>>
>>>IF nXCoord >= This.Parent.Left + This.Parent.Width - This.Width + This.xOffSet
>>>	nXCoord = This.Parent.Left + This.Parent.Width - This.Width + This.xOffSet
>>>ENDIF
>>>
>>>This.Left = nXCoord - This.Parent.Left - This.xOffSet
>>>
>>>This.Value = (This.Left / (This.Parent.Width - This.Width)) * 100
>>>
>>>WAIT WINDOW TRANSFORM(This.Value, "999.9") + " %" NOWAIT
>>>
>>>RETURN

>>>
>>>
>>>Note that this way, the position of the button remains correct according to the position of the mouse cursor.
>>>
>>>Cool, isn't it ?
>>
>>Yes, I was jYust looking at that. I noticed that when I pressed the mouse, the button jumped
>>a bit. This fixed it.
>>
>>Thanks!
>
>
>
>Great.
>
>Now there are some other things to add:
>
>1 - InteractiveChange event
> When the user moves the mouse when left clicking the mouse
>2 - Orientation (0 = Horizontal / 1 = Vertical)
>3 - Tick Frequency
>4 - Tick Style (0 - BottomRight 1 - TopLeft 2 - Both 3 - No Ticks)
>5 - Line below the button
>6 - SmallChange / Big Change
>
>
>Very easy stuff...

Yes, I already have some of this in there. I just couldn't get the movement right. As soon as its
done, I'll send you a copy.