Make your own slider. Complete graphical slider control: Vertical/Horizontal orientation, ShowValueTip option, [Long] range... Sample project and some images included. __________________________________________________ Re-coded: 2005.05.29. OCX to private usercontrol.
Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzip to decompress it.Virus note:All files are scanned once-a-day by Planet Source Code for viruses, but new viruses come
out every day, so no prevention program can catch 100% of them. For your own safety, please:
Re-scan downloaded files using your personal virus checker before using it.
NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
Scan the source code with Minnow's Project Scanner
If you don't have a virus scanner, you can get one at many places on the net
including:McAfee.com
Terms of Agreement:
By using this code, you agree to the following terms...
You may use
this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.
You may link to this code from another website, but ONLY if it is not wrapped in a frame.
You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.
Nicely Done! Now if be nice if Microsoft would follow this example and create a slide control that supports something other than Integer values. Hint... Hint... Microsoft! (If this comment was disrespectful, please report it.)
Nicely Done! Now it would be nice if Microsoft would follow this example and create a slide control that supports something other than Integer values. Hint... Hint... Microsoft! (If this comment was disrespectful, please report it.)
ahhhh another classical hit by the man who brought us the awesum button. Thanks for sharing it with us! 5 gL0Be$ (If this comment was disrespectful, please report it.)
Hello Carles, > Your Slider control is excellent, I give you 5 globes for this work. > Suggestion: Make a scale (with 'GDI' functions) optional 'Visible or not' '... Indent your Code and use more 'With' statement`s. > Any suggestion For your next project`s small Toolbar, Listbox, Statusbar, a small PrintPreview(50-80Kb) > > Thanks for share your work. (If this comment was disrespectful, please report it.)
one thing is missing in this slider. In other slider controls, if you click on the rail anywhere, slider will move to that position(see vb slider or winamp). This will make this slider perfect.
Anyway 5* (If this comment was disrespectful, please report it.)
A little tip, though. Before zipping your files to upload, open the project files with Notepad and delete the absolute reference to the files. The files reference should always be relative if you want your project to work right away on other computer. What I got when I opened your project was a series of error messages saying that the forms where not found.
Exemple:
Form=..\..\..\..\..\Archivos de programa\Microsoft Visual Studio\VB Carles\Controls\cpvSlider\Test1.frm
1) .Move x * 15, y * 15 in Function ShowTip is absolutely NOT working for large fonts (Screen.TwipsPerPixelX = 12:-)) so i get a pretty displaced tooltip. Use Screen.TwipsPerXXXX props.
2) in UserControl_MouseMove don't just count on SliderHooked for mousecapture. your usercontrol could have gotten WM_CANCELMODE and the capture will be released. instead put a simple check for vbLeftButton still being pressed in the beginning of the event like this: If (Button And vbLeftButton) = 0 Then SliderHooked = False. E.g. Press and hold left mouse put and drag the slider. Then WITHOUT releasing it press Ctrl+Esc. Release button. Try to move the mouse (with released button) over the control.
3) Mind that Button checks should be bitmask compares and not test for equality. Test your slider code this way. Press and hold left button and drag slider. Then WITHOUT releasing it press right :-)) "strange behaviour you get!" (Episode II?)
HTH,
Nice coding, btw.
</wqw>
(If this comment was disrespectful, please report it.)
Great work but can't get the OCX to install on a client, works fine at design time, runtime throws an error, saying not correctly registered, or files missing (this is on Win95 and 2K) (If this comment was disrespectful, please report it.)
Nice job. I compile the Start project into an ocx control; however when I try to use the new ocx component, the standard rail and slider icon images do not show up and I get a Run-Time error '50003': Unexpected error. Is there a reference that was coded to look in a particular directory for these images? Thanks in advance (If this comment was disrespectful, please report it.)
This is a great slider. adn im used into my mp3 player. please evaluate it Searching "DRey MP3 PlayeR" in PSC search box. Thanks. (If this comment was disrespectful, please report it.)
2/7/2004 10:35:01 PM:
how do you make the background transparent? i seem to get a little bit of bacground colour on each side of the sliderbar. (If this comment was disrespectful, please report it.)
4/11/2004 4:08:38 AM:
love the slider but like many outers i have seen you can not set the imag's from wintin the coding of the project form this would be a grate featuer to add for all slider controls (If this comment was disrespectful, please report it.)
Here is an example of smart and clean programming. I've looking for such a thing coz the one Microsoft did makes the bottom the maximum when it's oriented vertically. You missed this pitfall (well duh!!!).. 5 stars all the way (If this comment was disrespectful, please report it.)
9/2/2004 11:50:00 AM:
Been searching two days for some way to fix the VB Slider or scrollbar to make it more colorful/get rid of the tool tip. Shoulda looked here first! Great job, this is ten times better than any of the other submissions found searching for "slider". (If this comment was disrespectful, please report it.)
1/20/2005 10:05:59 AM:
how can I make the exe file ? (If this comment was disrespectful, please report it.)
2/7/2005 4:06:48 AM:
5 stars! An excellent slider (If this comment was disrespectful, please report it.)
I don't know if anyone is still checking this, but does anyone know how to make the background transparent? I tried changing the BackStyle to transparent, but this made the slider and rail disappear. I then set the slider and rail image boxes to Visible=True but then I couldn't click and drag the slider. I know I'm missing something simple. Any help would be greatly appreciated. (If this comment was disrespectful, please report it.)
Add Your Feedback
Your feedback will be posted below and an email sent to
the author. Please remember that the author was kind enough to
share this with you, so any criticisms must be stated politely, or they
will be deleted. (For feedback not related to this particular code, please
click here instead.)
By 44 Users
Download code
11/13/2001 6:25:00 PM: 
