Important alert: (current site time 7/16/2013 2:53:52 AM EDT)
 

winzip icon

isExplorerBar 1.91 - The Explorer Bar Control. Updated: 2004-08-12

Email
Submitted on: 5/5/2004 1:02:16 AM
By: Fred.cpp  
Level: Advanced
User Rating: By 99 Users
Compatibility: VB 5.0, VB 6.0
Views: 44528
author picture
(About the author)
 
     Just See the Screenshot!. Have You ever wanted to use in your apps a control like the left bar in the explorer? there are some controls like that on the net, but they have too many dependences. isExplorerBar is a SINGLE FILE CONTROL and has almost NO DEPENDENCES (actually runs without extra dependences in a new VB Project) And uses THE REAL theme apareance or emulates it when no theme data aviable, everything is done in Runtime, using UxTheme.dll (included in WinXP). no extra dll's or subclasing cls modules, a single file control that has everything you need to make your apps look better. I've put a lot of work on this. please donwnload and tellme what you think. I've created a webpage for this control. includes some help, comments and extra info about It. please comments, sugestions and of course, votes are wellcome. ************************************************* Lot Of Updates, Current version: 1.91 Feedback comments, are wellcome. Visit the page for versions history. Best Regards to everyone. Fred.cpp

 

Windows API/Global Declarations:

Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!
'**************************************
'Windows API/Global Declarations for :isExplorerBar 1.91- The Explorer Bar Control. Updated: 2004-08-12
'**************************************
Tons, see the zip
winzip iconDownload code

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:
  1. Re-scan downloaded files using your personal virus checker before using it.
  2. NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
  3. 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...   
  1. 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.
  2. 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.   
  3. You may link to this code from another website, but ONLY if it is not wrapped in a frame. 
  4. You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.


Other 11 submission(s) by this author

 


Report Bad Submission
Use this form to tell us if this entry should be deleted (i.e contains no code, is a virus, etc.).
This submission should be removed because:

Your Vote

What do you think of this code (in the Advanced category)?
(The code with your highest vote will win this month's coding contest!)
Excellent  Good  Average  Below Average  Poor (See voting log ...)
 

Other User Comments
5/5/2004 1:04:09 AMFred.cpp

please leave comments and votes :)
(If this comment was disrespectful, please report it.)

 
5/5/2004 2:30:44 AMPhilR

Congratulations on your effort!! This is a splendid submission. 5 from me!
(If this comment was disrespectful, please report it.)

 
5/5/2004 2:34:01 AMFred.cpp

thanks for the vote and the comment PhilR. I'll add some visual effects (as soon as I can)
(If this comment was disrespectful, please report it.)

 
5/5/2004 3:09:46 AMThushan Fernando

great work and very nicely laid out... keep me updated:-) i use the vbA one atm in our stuff, while i cant say i dont like the vba one i sure know what you mean by dependencies;-) Good work never the less...
(If this comment was disrespectful, please report it.)

 
5/5/2004 4:19:53 AMFred.cpp

zip updated. please download again. now no win9x errors.
(If this comment was disrespectful, please report it.)

 
5/5/2004 5:30:28 AMfrostbyte2k2

well, very well !! i think it could be better if we can use "skin", not a xp theme (ex : you use classical, and your application use mac osx theme). but it's just my idea
(If this comment was disrespectful, please report it.)

 
5/5/2004 5:33:46 AMFred.cpp

the idea of using the XP theme is that you don't need anything more than inser the control on the form and that's all. Maybe It would be nice too. If more people request this, It could be possible :)
[don forget to vote :) ]
(If this comment was disrespectful, please report it.)

 
5/5/2004 8:06:04 AMDan Redding - Blue Knot Software

Very nice; works OK on Win2K as well; only minor issue is that you must select a 32x32-only icon. Multi-format icons tend to choose the 16x16 vers; and it 'hangs' above the bar (same with a 16x16-only icon). 48x48 icons are 'cropped' as well.
(If this comment was disrespectful, please report it.)

 
5/5/2004 8:12:29 AMMartin Engelbrecht

I am working on Windows 2000 Pro.

But seems you have fixed this.

Great app. You get 5 from me!!!
(If this comment was disrespectful, please report it.)

 
5/5/2004 8:39:24 AMUK Lawman

Now this project shows a lot of promise, its well commented and easy enough to follow and understand. It compiled and ran first time on my XP Pro PC. This gets my 5 globes. Looking forward to future updates.

Thanks for sharing, this is one app worth developing further.
(If this comment was disrespectful, please report it.)

 
5/5/2004 8:42:24 AM

VB 5.0 Incompatibitility in this line:
TextAlign As DrawTextFlags
on Private Type UxTheme

(If this comment was disrespectful, please report it.)

 
5/5/2004 8:49:58 AMWentworth

The ScrollBars need some attention.
They show old style in XP.(they also flash when you scroll them)

Theres a lot of flicker when scrolling.
Hence that's probably why you made the form fixed!

This is a nice control but it is a long way off being near the VBAccelerator one.

So I Will Give 4 balls.
(If this comment was disrespectful, please report it.)

 
5/5/2004 9:09:13 AMfoxsermon

i just got to say, muy buen trabajo, excellent job. I really like it at all.
you deserve indeed 5 points. De nueva cuenta buen trabajo.
(If this comment was disrespectful, please report it.)

 
5/5/2004 9:30:48 AMMike Kosmatopoulos

Nice!
I bet that this will be code of the month :)
(If this comment was disrespectful, please report it.)

 
5/5/2004 11:41:29 AMFred.cpp

wow lot of comments thanks a lot.
About the icons size, I wasn't noticed It out, I'll work on it.
I know this control IS NOT Like vbaccelerator one, but I really don't want to have so much dll's and ocx intalled just to run a control. that's the point. If you see the history in he control webpage, you will se that the idea was to have a small emulation. It has growed up too much.
about the other comments, I'm workin on all them. please leave more comments. [yes! and votes :) ]
(If this comment was disrespectful, please report it.)

 
5/5/2004 11:42:52 AMFred.cpp

someone with VB 5 could please tellme If Is It compatible? ( I suppoused It was :/ )
(If this comment was disrespectful, please report it.)

 
5/5/2004 12:48:37 PMPhantom Man

There's A Few Issuses I Know Your Sorting Out.
But Appart From That. I Like It.

(If this comment was disrespectful, please report it.)

 
5/5/2004 12:48:41 PMPhantom Man

There's A Few Issuses I Know Your Sorting Out.
But Apart From That. I Like It.

(If this comment was disrespectful, please report it.)

 
5/5/2004 1:34:38 PMFred.cpp

I'm working on the scrollbar issue, I'll update in less than 24 hours thanks for all the comments and votes.
(If this comment was disrespectful, please report it.)

 
5/5/2004 7:55:13 PM

Fred, solo me quedo una palabra... Guau.. esto esta genial mi chavo, sigue echandole ganas y dando sorpresas como esta, la verdad yo te doy 5,
Saludos.
(If this comment was disrespectful, please report it.)

 
5/5/2004 9:21:58 PMFred.cpp

Gracias nacho
Thanks Ignacio, even when your name didn't appear in the comment I see are you in the voting log. thanbks for the vote and comment.
(If this comment was disrespectful, please report it.)

 
5/5/2004 9:26:39 PMMesa

You have a good start.
Please Keep up improve the control.

(If this comment was disrespectful, please report it.)

 
5/5/2004 9:28:17 PMFred.cpp

Thanks for the vote and comments^_^ I'm working on It.
kind regards
(If this comment was disrespectful, please report it.)

 
5/6/2004 1:30:56 AMFred.cpp

wow this is so cool! 18 votes in 24 hours this is a nice day ^_^ thanks for the votes and comments I've fixed the IconSize Bug on the Especial Header. the scrolling bar will take some more time. I'm trying to implement api scrollbars but as tou know that requires subclassing, so i need some magic to avoid using a cls and a bas file. I have less tan 8 hours to do it re upload and go to sleep. please be patient:D
(If this comment was disrespectful, please report it.)

 
5/6/2004 3:13:55 PMFred.cpp

:/ wow afthe a long time, I thougt the submissin was be lost :o
please vota here again ^_^ If you havent:P
(If this comment was disrespectful, please report it.)

 
5/6/2004 4:18:49 PMcbennett08

this is amazing code and one of the easiest pieces to implement..

5 stars is not enough for this code submission!!
(If this comment was disrespectful, please report it.)

 
5/6/2004 4:21:23 PMFred.cpp

thanks for the kind comments. ^_^
(If this comment was disrespectful, please report it.)

 
5/6/2004 6:28:52 PM

Very nice, code of the month. 5 globes.
(If this comment was disrespectful, please report it.)

 
5/6/2004 8:24:44 PM

Thank's Fred for sharing!!, this is a great job!!, keep it up!! 5* from me
(If this comment was disrespectful, please report it.)

 
5/7/2004 5:36:46 AMDreamer

Hi Fred,

Nice submission - but I have xp and my theme is Olive the 2nd and 3rd Items (in your demo) stay drawn in blue (as if the theme was the default blue one)apart from the top one.

Is this a bug or is it ment to be like that?
They should be drawn in Olive.

(If this comment was disrespectful, please report it.)

 
5/7/2004 12:31:27 PMFred.cpp

Using a theme editor I see the colors are different inside the theme from that wesee in the real explorer bar I wasn't noticed It out (I don't use luna theme, just changed to It to make some screenshots. Looks like the explorer colorizes the control afther draw the theme background. I'll check It out. Thanks for the bug report.
(If this comment was disrespectful, please report it.)

 
5/7/2004 12:50:51 PMFred.cpp

This control is not Identical to the vbAccelerator one, that would be nice, but It Is not. vbaccelerator ExplorerBar uses the next files: 4 .bas modules; 10 .cls clases; 5 .bmp images, 1 .cur image cursor file; a .res (resource) file and a ctl (usercontrol) file. as you can see, my control uses only a usercontorl file. If you try to use the vbAccelerator control in a pc It requires: SSubTmr6.dll, and other 2 libraries that are not included in VB. my control just need VB. and If you want to display Icons a reference to commoncontrols. my control is not as good as VBAccelerator one, but It's easier to insert in a project and use.....comments?
(If this comment was disrespectful, please report it.)

 
5/7/2004 3:40:13 PMFred.cpp

for those who want to load a 32x32 icon form a multi resource icon, you can do it with this code:
isExplorerBar1.AddSpecialGroup "Caption", LoadPicture(cdDlg.FileName, vbLPLarge, vbLPColor, 32, 32), imgBackground

'LoadPicture(cdDlg.FileName, vbLPLarge, vbLPColor, 32, 32) will load a 32x32 icon from the file.
(If this comment was disrespectful, please report it.)

 
5/7/2004 8:41:23 PMPeter.

Uses real theme?? Im using xp silver and I get the default blue. Resize the form and a scrollbar should appear to access now non-visible items.
There's no scrolling effect when clicking on a panel in the explorer bar? panels simply display open/closed. No Images? Whats the background picture's, images from your folder named the same? Also some flicker.
(If this comment was disrespectful, please report it.)

 
5/7/2004 8:54:07 PMFred.cpp

Thanks for the comments Peter.
Yes, this is the real theme. If you use a Explorer theme like VBAccelerator one, you will see the theme data for the ExplorerBar Is bule, even for Olive and silver themes. The Real Explorer Bar uses custom code to draw those colors.
If you add more items or groups, you will see the scrollbar.
...
(If this comment was disrespectful, please report it.)

 
5/7/2004 8:54:40 PMFred.cpp

I know there are no animations. As I said in the code, I'm implementing the basic funcionality. It's hard to add blending and scrolling animations in a control without subclassing. But As I said before, I'm working on this.
Those Images In the "Images" folder Are If you want to include a background image in a special group. They ARE NOT USED t draw the control. If toy remove that folder, the control works.
And about the flicker I know. When the vertical Scrollbar Is shown, redraw events cause the scrollbar to flicker, even when the control doesn't.
I want to thank everyone who has supported this project. and who have made some criticism. I Invite everyone to read the comments on the control code. It's a work In progress that Is designed to be easy to use. to use not so many resources and to be free to use for everyone. I'm working on the api mannaged screollbars (thet looks better and don't cause the control to flicker) But I have some problems with some Windows Messages.
(If this comment was disrespectful, please report it.)

 
5/7/2004 8:55:30 PMFred.cpp

I invite users to rate my work. I've added comments to almos every line/section of code.
Thanks to everyone.
(If this comment was disrespectful, please report it.)

 
5/7/2004 11:16:18 PMPeter.

If I want to add several check boxes and a textbox to a panel, say for a search tool, how do I implement the resizing/positioning of the controls?
(If this comment was disrespectful, please report it.)

 
5/7/2004 11:28:01 PMFred.cpp

This Feature Is under Development.
I'm planning To Use two ways to do this.
The first One, Set a Group Into a container where you can add controls like the Rebar Control.
the other one, Is to transform the control In a container, where you can Add a container and more controls.
In this, you have to edit the resize event of the container ( a picture box) and the control will respond to the size changes of the main container.
this features are not yet imlpemented. I'm working In the Details Preview Image and the api scrollbars.
(If this comment was disrespectful, please report it.)

 
5/8/2004 3:07:17 AMlvlhed

This is a great piece of work. Quick follow ups and bug fixes by author. 5 globes from me!
(If this comment was disrespectful, please report it.)

 
5/8/2004 3:09:14 AMlvlhed

I forgot to mention, try to keep the updates to one a day or something as I do not know if I can keep up with more then that! hehehe ;)
(If this comment was disrespectful, please report it.)

 
5/8/2004 3:12:49 AMFred.cpp

thanks lvlhed I'm still working on this...thing (I mean this control :P )
(If this comment was disrespectful, please report it.)

 
5/8/2004 5:30:17 AMPeter.

Due to the unforeseen color scheme problems(thanks to your email & explanation), dam(n) M.S... I have upgraded my vote ;) I still feel adding controls is going to be a headache.
(If this comment was disrespectful, please report it.)

 
5/8/2004 7:33:06 AMPhantom Man

Hi Fred,

I Commented Earlier And Forgot To Vote.
Glad To See Your Keeping Up With The Updates.
I Hope You Win Code Of The Month, You Deserve To In My Opinion, Just For the Effort Alone You Have Put In.

My Vote Of 5 Should Put You In Top Spot.

Kind Regards
Gary

Keep Up With The Updates, You Have The Making Of A Really Nice Easy To Use Control.
(If this comment was disrespectful, please report it.)

 
5/8/2004 8:02:57 AMAris Buenaventura (a.k.a. Haru Glory)

Wow, this is great.

BTW, why don't you renamed __________174192562004.2 To __________174192562004.zip.
(If this comment was disrespectful, please report it.)

 
5/8/2004 8:03:01 AMAris Buenaventura (a.k.a. Haru Glory)

Wow, this is great.

BTW, why don't you renamed __________174192562004.2 To __________174192562004.zip
(If this comment was disrespectful, please report it.)

 
5/8/2004 9:40:39 AMCarles P.V.

Nice one! And EASY to use :-) Two minor things: 1) ReleaseCapture/SetCapture technique to avoid timer is giving problems with scrollbar. Simply, take in account ScrollBar width at time to set m_bOver flag in MouseMove() sub. 2) Scroll bar flickers... Set UserControl's ClipControls property to [True]. And a last one... Avoid the use of 'native' UserControl paint functions (Line) on persistent drawings (AutoRedraw=True). This could slow down a little bit paintings. :-)
(If this comment was disrespectful, please report it.)

 
5/8/2004 12:51:11 PMFred.cpp

thanks for the comments.
wow, I I have some thing to say :D
Haru Glory, The zip I uploaded was named isExplorerBar_1.2.zip PSC changed the name ( I still don't know why)
(If this comment was disrespectful, please report it.)

 
5/8/2004 12:56:16 PMFred.cpp

wow, charles, thanks for the comments, I was waithing for your comments. I't nice to see you here. I'll implement the enhacements you sugested.
thanks a lot :)
(If this comment was disrespectful, please report it.)

 
5/8/2004 3:09:09 PMFred.cpp

I'll update this tonight :D You will see nice things ;)
Regards
(If this comment was disrespectful, please report it.)

 
5/8/2004 4:42:47 PMFred.cpp

thanks for the vote and comments Gary. Also You Deserve to Win, you control Is excellent ( I want to Use It In a Yahoochat client :D )
Regards.

I'll update tonight with the improvements sugested by Charles and some other small changes.
(If this comment was disrespectful, please report it.)

 
5/8/2004 6:09:06 PMAris Buenaventura (a.k.a. Haru Glory)

Fred, I think the problem is you have two dots "isExplorerBar_1.2.zip" in your filename.
(If this comment was disrespectful, please report it.)

 
5/8/2004 6:12:16 PMFred.cpp

thanks Aris, I'll update the zip tonight
regards
(If this comment was disrespectful, please report it.)

 
5/9/2004 3:19:41 AMFred.cpp

I'm uploading Again. Thanks to everyone for the support. I've eliminated the Flickering in the scrollbar (Thanks Charles P.V. again) I've Added a Details Image Property (I Need Feedback About It) and a Small Bugfix for those tho doenloaded the 1.2 Version, Download again (Some times there was not Redraw afther Clear Structure Event). Also Only a Dot In the name for those who downloaded a .2 instead of a .zip file.
A Small Bugfix: The 1.2 Version was not showing the expand button in the tree states. ( Normal, hot, pushed). Also the demo app Is Rezisable and toy can see the scrollbars.
More Updates comming soon.
Best Regards.
(If this comment was disrespectful, please report it.)

 
5/9/2004 3:27:31 AMFred.cpp

I go to Sleep.
(If this comment was disrespectful, please report it.)

 
5/9/2004 4:13:39 PMFred.cpp

Updated Again. Now Detects the theme changes. And some small changes In the code. Please download Again. I prommise will be more updates. You should download always the newest Version. Current Version: 1.31
(If this comment was disrespectful, please report it.)

 
5/10/2004 5:23:30 AMZhu JinYong

If the User changes the Windows Theme, Now the control Updates his appareance ???
(If this comment was disrespectful, please report it.)

 
5/10/2004 5:55:27 AM

Excelente código Fred.
Mi voto es de 5.

(If this comment was disrespectful, please report it.)

 
5/10/2004 6:18:56 AMMike

Theme support????
Although it support theme it doesn't paint properly.
(If this comment was disrespectful, please report it.)

 
5/10/2004 11:37:18 AMFred.cpp

hi to those who say the theme is not property drawn. I know what are you talking About. Olive and Silver Schemes contain the same theme data for the group background and expand buttons, that's because they look in blue color. I'm working on this. the Windows Explorer Uses custom code to draw this, but If you open the search band, you will se those blue colors in some places Even If you use olive or silver.

(If this comment was disrespectful, please report it.)

 
5/10/2004 11:45:20 AMFred.cpp

I'm trying to find a way to "fix" this If you want to see the theme data you can see the It With the VBAccelerator Theme Explorer. or see the images here: http://mx.geocities.cm/fred_cpp/isexplorerbar in the wip section.
Regards
(If this comment was disrespectful, please report it.)

 
5/11/2004 5:34:39 AMFred.cpp

Maybe this is the final update to the version 1.x please download again. and comment.
Best Regards
(If this comment was disrespectful, please report it.)

 
5/11/2004 5:35:53 AMFred.cpp

I forgot to say, the Screenshot Is an Animated Gif
(If this comment was disrespectful, please report it.)

 
5/11/2004 10:26:59 AMZhu JinYong

1.If the User changes the Windows Theme, this control can't draw itself correctly.you should clean it then draw again.
2.Mouse moving out an item,Font keep bold.

(If this comment was disrespectful, please report it.)

 
5/11/2004 10:33:28 AMZhu JinYong

please duplicate this problem by changing theme from XP theme to windows classic then back to XP theme.
(If this comment was disrespectful, please report it.)

 
5/11/2004 1:02:02 PMFred.cpp

thanks Zhu JinYong I at last see the bug. I'll fixit today.

(If this comment was disrespectful, please report it.)

 
5/11/2004 1:24:01 PM

Thank you for sharing !!!
5 globes.
BUG : The new update (1.40) doesn't work in Win98.
Runtime Error 48: file not found
(If this comment was disrespectful, please report it.)

 
5/11/2004 1:26:18 PMFred.cpp

:o Sorry, I havent' tested It In Win98 in some days, I assumed It worked. I'll check It Out.
Come back soon for an update.
Regards
(If this comment was disrespectful, please report it.)

 
5/12/2004 2:54:43 AMFred.cpp

Again the control is Win98 Compatible (sorry, I was comented a small section for some tests). But even when I canDetect the Windows Classic to Windows Themed change, The theme doesn't draw, API call fail when they souldn't. I'm working On this. I promise I'll make a new update on this week.
Best Regards.
Fred.cpp (Author)
(If this comment was disrespectful, please report it.)

 
5/12/2004 3:40:35 PMselftaught

Two things I noticed: the tab order/index (try tabbing even on the form's other controls and see what happens!) and sometimes activating the form will fail if you click on the usercontrol. For example, if you have IE at the top of the zorder partially covering the form, and you click on certain areas of the explorerbar, then both IE's title bar and the form's title bar will show inactive and IE will remain on top.
(If this comment was disrespectful, please report it.)

 
5/12/2004 3:46:23 PMFred.cpp

mmm, thanks selftaught, I wasn't noticed that. I'll see what happens with that "bugs".
Regards
(If this comment was disrespectful, please report it.)

 
5/13/2004 10:35:54 AMRay Hildenbrand

took me a while fred but heres my five
(If this comment was disrespectful, please report it.)

 
5/15/2004 2:41:19 AMFred.cpp

I'm still working in some bugs, please be patient :)
Best Regards
(If this comment was disrespectful, please report it.)

 
5/15/2004 1:17:15 PMBrian Zablocky

I cannot get it working on Win2k/VB6. Have tried everything I could without breaking the code. Looks nice so I gave it 3. Wish I could see it work though...
(If this comment was disrespectful, please report it.)

 
5/15/2004 4:16:52 PMFred.cpp

I would like to know that is exactly the problem?
(If this comment was disrespectful, please report it.)

 
5/15/2004 6:22:48 PM

Muito Boa Porém a uns bugs, quando você finaliza o visual basic "end", a aplicação não fecha e não executa mais...
(If this comment was disrespectful, please report it.)

 
5/15/2004 7:11:06 PMFred.cpp

Also I found out that bug, I've Fixed It. But I'm working in some other stuff in the control. I'll update tomorrow night.
Best regards.
(If this comment was disrespectful, please report it.)

 
5/16/2004 8:34:40 AMAnders Nissen

A bug: The control dosn't redrawn correctly when the form is maximized.
An added feature could be opening and closing animations on the tabs - i.e. with alpha fade :)
Nice work!
(If this comment was disrespectful, please report it.)

 
5/16/2004 2:35:05 PMFred.cpp

I can't recreate the maximized bug Anders I would like to know more about It.
Regards.
(If this comment was disrespectful, please report it.)

 
5/16/2004 8:15:52 PMThomas Yates

Very difficult to make a system like this. I am going to test this against the "buggy" vbAccellerator open source version. It looks promising.
(If this comment was disrespectful, please report it.)

 
5/17/2004 3:46:29 PMFred.cpp

Well, the new update Is there. Please comment and vote.
As I said the bug when you use Classic style and later a Themed Style, Is still there. I'm reading the documentation of microsoft about themes. Is someone knows why this bug happens, I want to know.
Best Regards.
(If this comment was disrespectful, please report it.)

 
5/17/2004 9:30:34 PMBrian Zablocky

Ok. Got it working. Important to note that if your error handler is set to "Break on all errors" you will get a uxtheme.dll error. Special thanks to the author for repeatedly emailing me in an effort to solve my problem. Very very nice.
(If this comment was disrespectful, please report it.)

 
5/17/2004 9:48:05 PMFred.cpp

It's nice to know that the control can be used for more people. that's motivating.
thanks for your bug reports and comments.
(If this comment was disrespectful, please report it.)

 
5/17/2004 10:17:08 PMFred.cpp

And Votes:D
So many thanks.
Best Regards
(If this comment was disrespectful, please report it.)

 
5/18/2004 2:28:22 AMZhu JinYong

1.If the User changes the Windows
Theme, this control can't draw itself
correctly.you should clean it then draw
again.
2.Mouse moving out of an item,then moving in,again moving out,items were drawn thicker and thicker.You should clean items first then draw again.
3.How can you set usercontrol initial font color as 0!!!This is not a standard way.Codes need a lot of trimming.Please check and analysis another posting 53494 to see how others people are doing.


(If this comment was disrespectful, please report it.)

 
5/18/2004 12:55:50 PMFred.cpp

Zhu JinYong, as I said before, the problem about not redrawing when visual style is set to windows Classic and later is set to a Themed Style Is not because I don't call the code to draw It. I'ts because the App properties are set to not themed, then when I call the api to draw the background and other elements faill, even when the API call say It was succesful. Microsoft as far as I've seen, doesn't say this, I've read almost all the documentation ( http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commct ls/userex/refentry.asp ) and there Is not an explanation for this (or my English Is still too bad, sorry)
(If this comment was disrespectful, please report it.)

 
5/21/2004 4:40:43 AMRaven

Nice submission, but the drawing is not quite right.

Also your simplistic approach is probably holding you back.

(If this comment was disrespectful, please report it.)

 
5/21/2004 3:41:57 PMFred.cpp

About the drawing stuff, please see comments in the description and code.
Regards
(If this comment was disrespectful, please report it.)

 
5/22/2004 11:10:42 PMFred.cpp

A huge update is comming!
(If this comment was disrespectful, please report it.)

 
5/23/2004 3:37:07 PMgonchuki_

can't wait for it ^^

5* in the meantime... sad i can't give you 5 more after the update.
(If this comment was disrespectful, please report it.)

 
5/25/2004 1:30:55 AMHeriberto Mantilla Santamaría

Español: Excelente código, simplemente espectacular

English: Excellent code, simply spectacular
(If this comment was disrespectful, please report it.)

 
5/25/2004 1:37:50 AMFred.cpp

Thanks Heriberto. I'm working In the next Update! Will Be ready in the next 2 hours!
( O despues, si se me acaba el café y la DrogaCola :\ )
(If this comment was disrespectful, please report it.)

 
5/25/2004 5:36:42 AMFred.cpp

OK, I've uploaded the new Version (1.62) See the screenshot, Is a bit fast-made, but show the mos important. Click the "more" button in the demo and you will see the updates.
feedback is very apreciated.
If you downloaded a previous version, you have to download this one, maybe the last one?
Regards.
(If this comment was disrespectful, please report it.)

 
5/25/2004 6:09:18 AMZhu JinYong

good update.
But With mouse fast moving,item font still got problems.try to move mouse from a item to next item,all items in some group are bold.
(If this comment was disrespectful, please report it.)

 
5/25/2004 8:30:58 AMZhu JinYong

enhanced version.
But With mouse fast moving,item font still got problems.try to move mouse from an item to next item,all items in the same group keep bold.

(If this comment was disrespectful, please report it.)

 
5/25/2004 12:16:53 PMFred.cpp

I haven't been able to reproduce that bug :/ I would like to know what OS and configuration do you have
(If this comment was disrespectful, please report it.)

 
5/25/2004 1:03:15 PMPhantom Man

Hi Fred

Nice Update.
But Let Me Point Out A Few Errors I Have Found:

1. The Theme Doesn't Automatically Change From XP To Desert Or Any Other Theme Other Than Classic.

(This Might Be Because You Have The Theme To Check For 'Classic' Only, My Suggestion Would Be Change The 'Classic' Flag To 'Non Themed' Or Something Like That And That Should Sort Out The Problem.)

I Came Across This Error Because I Never Use The Default 'Classic' Theme On My Computer.

2. Zhu JinYong Is Correct In what He Is Saying. I Get The Same Problem With WinXP.

3. When You Hover Over A Text Box Or Any Other Control The Mouse Pointer Stays Set To Hand, Even Though The Said Control Is Set To Default.

If You Need Anymore Info Email Me.

Apart From That I'm Liking This Control More And More Every Time There's An Update.

Kind Regards
Gary

(If this comment was disrespectful, please report it.)

 
5/25/2004 2:03:34 PMFred.cpp

About the non automatic redraw, The problem is that I don't Catch the WM_THEMECHANGE MEssage, I use the resize event to know then the user has changed something. But when you use a Non themed Color combinations, I can't detect the resize, so there is not automatic redraw. The control will update as soon as you move the mouse or make a change to the form or the control itself.

(If this comment was disrespectful, please report it.)

 
5/25/2004 3:35:40 PMFred.cpp

I need Screenshots of Asian Languajes with the control, could someone help me? :D
(If this comment was disrespectful, please report it.)

 
5/25/2004 4:29:10 PMThorben Linneweber

WoW! I don't know why only a few people vote for the fantastic code?!
5 from me! (i would give you more points/balls/stars)
(If this comment was disrespectful, please report it.)

 
5/25/2004 6:34:58 PMFred.cpp

Thanks for your kind comments. I hope This be useful for you.
Regards.
(If this comment was disrespectful, please report it.)

 
5/26/2004 2:16:23 AMMArio Flores G

WOW Veo que haz estado trabajando en este componente!! Aunque el control de VBAccelerator es mucho mas completo aun asi me gusta mas este por la portabilidad y facilidad de uso...muy buen trabajo..lo unico que te falta seria agregarle el FADE EFFECT cuando despiegas(EXPAND) los Grupos..aun asi Excelente!! VIVA MEXICO!!!!
(If this comment was disrespectful, please report it.)

 
5/26/2004 2:58:10 AM

nice work!!
im really a newbie in programming, so i dont really have any useful comments (aside from praises) on your work
(If this comment was disrespectful, please report it.)

 
5/26/2004 8:23:45 AMThorben Linneweber

May be you change the line of code in the "redraw"-sub:

"imagelist.picture" ---> "imagelist.extracticon" ...

This would be much better and it works fine.
(If this comment was disrespectful, please report it.)

 
5/26/2004 1:00:29 PMFred.cpp

Thanks for the tip. In these days I have been working in functionality, Next week I'll translate everything to API call's I bet afther that, I'll just add the animations (Thanks Mario, hehe). And I bet that will be all for the Version 1.XX.
Regards and thanks to everyone for the comments, votes and Sugestions.
(If this comment was disrespectful, please report it.)

 
5/27/2004 4:11:32 PMFred.cpp

Do you want more improvements?
what about Mouse wheel detection, fix in the scrollbar colors? what more? Please make suggestions, this month I'm working for free:D
(If this comment was disrespectful, please report it.)

 
5/27/2004 5:45:34 PMFred.cpp

OK, the guy who has recently voted with a single globe, maybe doesn't understand a single line of code, that would Explain why rated that way. Without say, Is a coward that doesn't even use his real name. It's a shame.
(If this comment was disrespectful, please report it.)

 
5/28/2004 11:27:13 PMgurpreetsingh

Hi Fred. Dont go mad at the poor guy. May be he had a fight with his wife or something. May be my 5 can compensate a little.Just wondering if its not much trouble to ask, From where I can get the Mac OS background picture. I mean the white background with pink Horz. lines in it ??In the screenshot you have that in one of them. Nice coding and 5 isnt going to be much for that. Regards Er. Gurpreet Singh, New Delhi
(If this comment was disrespectful, please report it.)

 
5/29/2004 12:07:01 AMFred.cpp

thaks gurpreetsingh, hehe, i think the guy with a single globe maybe need's a wife or something, hehe. Abut the background, Is the Windows Theme Mac OS Of Iceman ( http://www.jonmega.com/iceman ) the contorl uses the theme is currently installed, to make It look like that, you just need to install the theme.
Regards and thanks for the comments.
(If this comment was disrespectful, please report it.)

 
5/29/2004 4:40:01 AMdeckard

Boah ..

What a B e A U T Y

5X Globes
(If this comment was disrespectful, please report it.)

 
5/29/2004 2:46:42 PMFred.cpp

thanks for the comments and votes. I want to thank to Paul Caton for his awesome contribution for this (you will have news from him soon) Thanks to his help, I've fixed the errors I was been experiencing, because he made possible make a self subclassed control, I used his code to add theme change detection / scrollbar apareance fix/mouse wheel support. I'll update the Monday.
Best Regards.
(If this comment was disrespectful, please report it.)

 
5/29/2004 6:08:28 PMBrent Culpepper

5 from me, you did a very impressive job!

This is not at all criticism, just the worthless opinion of a die-hard subclasser ;)

There are several areas where your control is superior to the vbAccelerator version. I understand why you made a 'dependency free' version, but there is a lot of interesting potential here if you also created a subclassed version. Personally I always seem to end up with a reference to SSUBTMR.DLL anyway, so I don't mind the extra dependence at all! Just a thought, thanks for posting. :)
(If this comment was disrespectful, please report it.)

 
5/29/2004 6:31:19 PMFred.cpp

why will I release the update the Monday? Because on weekends, PSC doesn't allow update projects. Be patient :D
(If this comment was disrespectful, please report it.)

 
5/30/2004 2:14:09 PMPaul Caton

No problem, Fred. I want to thank you for pushing me to find a way of subclassing a UserControl without any dependencies.
(If this comment was disrespectful, please report it.)

 
5/30/2004 2:19:13 PMFred.cpp

Hi Paul, I want to thank you for doing It possible :D
(If this comment was disrespectful, please report it.)

 
5/31/2004 5:09:49 PMFred.cpp

I've Updated the code again ( version 1.70 ). comments, suggestions, bugs, votes, insults, are wellcome. Viva México :D
(If this comment was disrespectful, please report it.)

 
5/31/2004 5:49:45 PMFred.cpp

I need to update the screenshot :/

(If this comment was disrespectful, please report it.)

 
6/1/2004 12:54:23 AMZhu JinYong

5/25/2004 8:30:58 AM:Zhu JinYong

enhanced version.
try to move mouse from an item to next
item,all items in the same group keep
bold.


(If this comment was disrespectful, please report it.)

 
6/1/2004 12:04:52 PMFred.cpp

I thought that problem was fixed. I I'll try to see what's wrong. Also Maybe font property will be added, Still uses the font of the container form (Version 1.8? )
(If this comment was disrespectful, please report it.)

 
6/1/2004 9:29:42 PMBryant Zadegan

OMFG T3H 1337 R0X0R5!!! just kidding :P
this is still really neat tho. 5 globes :)
(If this comment was disrespectful, please report it.)

 
6/1/2004 9:32:19 PMFred.cpp

8·[
(If this comment was disrespectful, please report it.)

 
6/1/2004 9:46:19 PMstephen antony

Great my dear Freed You are Marvalus !! You Deserve this contest
dear a programmer should be like :
1. great ideas
2.coding skill
3.implementation skill
Really Great
Stephen Antony
www.keralaprogrammers.home-page.org

(If this comment was disrespectful, please report it.)

 
6/8/2004 7:54:31 PMFred.cpp

I'm working In a New Update. maybe the last. and Maybe a Version 2.0 will come Out Soon? (If I finish soon the isCombo and isButton :/ )
(If this comment was disrespectful, please report it.)

 
6/9/2004 8:51:46 PMWeikiat

Wonderful code!
I discovered a few bugs here and there. But those are minor!
This code rules!
Thank you so much.
(If this comment was disrespectful, please report it.)

 
6/16/2004 8:32:35 PM

Nice sums it up. Very Cool. 5 Globes from me
(If this comment was disrespectful, please report it.)

 
6/16/2004 9:49:44 PMFred.cpp

wowow code of the day! Thanks for the support for this project.
Best Regards
fred.cpp (Author)
(If this comment was disrespectful, please report it.)

 
6/16/2004 11:26:35 PMPaul Turcksin

Impressive. Thanks for sharing this pearl. 5 from me.
(If this comment was disrespectful, please report it.)

 
6/17/2004 11:33:56 AMAdemir Mazer Jr

very very good, I've just run the example and it looks amazing.
Thanks for good work
(If this comment was disrespectful, please report it.)

 
6/19/2004 11:05:00 AMferd(z)

dear Fred,

Somebody has pointed this out earlier 5/5/04 re vb5 incompatibility.
let me just give you the details ( i guest you could not replicate the error since you are using vb6)

Error 1
Compile error @ ln420, col31 in UxTheme type declaration of isExplorerBar.ctl
Private Enum types cannot be used as parameter or return types for public procedures, or as public data members.
(what i did here is to remove Private)

Error 2 during load which generate frmTest.log
Line 408: The property name CausesValidation in txtNewItemCaption is invalid.( i just click yes here )

Error 3 @ ln 1793,Col 1
Run-time error '91':
Object variable or With block variable not set
(here im stuck)

But still you deserve more than 5 globes.

regards
ferdz
(If this comment was disrespectful, please report it.)

 
6/19/2004 10:45:48 PMFred.cpp

wow o_0 That's the kind Of Bug reports I like, hehe.
I'll check It Out. And Maybe Make a VB5 Compatible Version.
Regards
(If this comment was disrespectful, please report it.)

 
6/21/2004 1:24:00 PMAdemir Mazer Jr

Hi Fred

I've made a little adjust in your code, to let the ClearSructure be called after a RaiseItem event, if you could, put it in the code, to next version come without this error. The code is:

'this code goes into MouseUp event in UserControl

'declares
Dim GroupKeyAux as string
Dim ItemKeyAux as string

'the code to change when calling the normal group raise event ItemClick
GroupKeyAux = m_SpecialGroup.key
ItemKeyAux = m_SpecialGroup.items(nj).key
RaiseEvent ItemClick(GroupKeyAux, ItemKeyAux)

Regards

Ademir
(If this comment was disrespectful, please report it.)

 
6/21/2004 7:01:00 PMFred.cpp

I'll Update this control to fix some bugs that have been reported on these days, Please be patient.
(If this comment was disrespectful, please report it.)

 
6/21/2004 10:05:05 PMFred.cpp

Version 1.81 Uploaded!
Sorry for the delay, I've been soo bussy. what's new?: ClearStructure Aviable from a ItemClick, also, Support for far asian languages (I Need Feedback and help About his, since I Don't know NOTHING abut japanese/korean/Chinese/ or any other language), comments Are wellcome.
For the VB5 Version, please hold on!
(If this comment was disrespectful, please report it.)

 
6/21/2004 10:43:06 PMFred.cpp

The UseTheme/UseCustom Property Is Because The DrawThemeText Api DOES NOT Draw Far Asian Language text, If you use a nonthemed windows GUI, use Win9X or are using Olive Or silver color Schemes (they are not real themed, Are emulated) you will not see a difference Between set this property to true or false.
(If this comment was disrespectful, please report it.)

 
6/23/2004 10:50:37 PMFred.cpp

Another Update, Jsut small changes to make the control to use less memory (I hope) compiled into an application works very well, I hope you Enjoy. This will be the last Update, I think. Or If someone found a bad bug, please report It. I couldn't add the credits for the last update, cuz PSC said the description Is too long :P
(If this comment was disrespectful, please report it.)

 
6/24/2004 1:28:20 PMFred.cpp

If you want to see the text In Your language, you need to set the font and font charset properies to some font that support your language, something like Arial Unicode MS / Charset Japanese
(If this comment was disrespectful, please report it.)

 
6/25/2004 11:52:02 PMFred.cpp

SetITem Text and set Item Icon functions now Work fine, Also a SetGoupCaption Function Was Added. Feedback Is Apreciated.
Regards
(If this comment was disrespectful, please report it.)

 
6/27/2004 11:14:19 PMFred.cpp

a New Update Is comming, Looks like I won't finish this control, hehe
(If this comment was disrespectful, please report it.)

 
6/29/2004 7:54:38 PMFred.cpp

a New Update Is comming, Looks like I
won't finish this control, hehe
(But I don't know when, sorry :(( )
(If this comment was disrespectful, please report it.)

 
6/30/2004 10:23:42 PMDJ Williams

Awesome code, keep up the good work!
(If this comment was disrespectful, please report it.)

 
7/2/2004 5:18:30 AM

I love it 5 globes from me. A question if I may ... can you have the options in the menu be disabled ?? This way I can scroll through and copy my existing file menu structure without doing any changes.

(If this comment was disrespectful, please report it.)

 
7/2/2004 5:50:08 AM

The more I use it the more I love it, it would be AMAZING if the icons could be addressed using their key value in the image list as well as the icon number, I've tried to add an extra Optional sIcon as string to the AddItem but I can't get this working.

It would also be excellent if you could remove groups/items like you can add them at run time

Keep up the good work as this is superb
(If this comment was disrespectful, please report it.)

 
7/2/2004 3:40:03 PMFred.cpp

I would love to fix those bugs, but I can't promise things right now. Anyway If someone has a Routine you can send It to me and I'll Include It In the source with credit for you. Regards.
Fred.cpp (Author)
(If this comment was disrespectful, please report it.)

 
7/5/2004 3:26:47 PMFred.cpp

There will be a update, I want to thank to Joerg Hohaus for his huge contribution to this project, he has made a lot of bugfixes and improvements recently, so I think you should get enough credit Joerg. Thanks Again
(If this comment was disrespectful, please report it.)

 
7/7/2004 12:37:57 PMphoenix

Thanks a lot but... too much compliments for just a few lines of code. Plz keep up your great work on this control it is the best I have seen!
(If this comment was disrespectful, please report it.)

 
7/7/2004 12:38:29 PMphoenix

Thanks a lot but... too much compliments for just a few lines of code. Plz keep up your great work on this control it is the best I have seen!
Joerg
(If this comment was disrespectful, please report it.)

 
7/10/2004 5:06:40 PMFred.cpp

Joerg, this update is also bring out thank to your work. Enjoy
(If this comment was disrespectful, please report it.)

 
8/12/2004 9:21:13 AM

looks great :)
1 thing i've found is that it not seems to work when i select the silver or olive green theme.
then it says 'invalid picture' and closes.
when i select the blue theme it works, and it also works in classical mode.
i'm running win2k3
(If this comment was disrespectful, please report it.)

 
8/12/2004 11:06:45 AMFred.cpp

seems like I've currupted the last update, I'll update soon (I have also a new mantaniance release :) )
Regards
(If this comment was disrespectful, please report it.)

 
8/12/2004 12:29:23 PMFred.cpp

zip updated.
(If this comment was disrespectful, please report it.)

 
8/12/2004 12:57:09 PM

yay, all fixed now.
keep it up, great code :)

ps.
quick response
(If this comment was disrespectful, please report it.)

 
8/19/2004 12:47:25 PM

your code is great, but it seems not to work if other theme than "Blue" is selected... please fix it :)
(If this comment was disrespectful, please report it.)

 
8/19/2004 4:00:46 PMFred.cpp

It works, please download the new
version( 1.91) and "blue" Is a color
scheme, not a theme, try more themes and
you will see It works (Also, works with
Olive and Solver Color schemes, try It
Out)
(If this comment was disrespectful, please report it.)

 
10/12/2004 3:02:40 PMJCM

Great job, but can´t keyboard navigation
(If this comment was disrespectful, please report it.)

 
11/9/2004 10:32:33 PMFred.cpp

Sorry, Keyboard Navigation is not enabled, I even didn't know the XP Bar had Kayboard navigation:/ For Now, this version won't be updated... until...V2?
(If this comment was disrespectful, please report it.)

 
11/17/2004 1:59:32 AMferd(z)

i have just used your control with splitter. API drawtext() modify the .caption if it will not fit with ellipsis, but, if you resize the control wide enough, titles "..." retains. i've use a local copy of caption in DrawText to overcome this.

congratulation with your isButtons3!

(If this comment was disrespectful, please report it.)

 
12/21/2004 8:09:42 AM

This is a great submission, but what if you just wnated to change the colour of the control background without using themes is there a quick way ??
(If this comment was disrespectful, please report it.)

 
1/28/2005 9:47:37 PMAlT

It is a excellent submission but, dude, you could take about 30k off the size of it if you rip out all of the orphaned constants, structs, and api declares you didn't use from the vbaccelerator sample.
(If this comment was disrespectful, please report it.)

 
1/29/2005 3:19:33 PMFred.cpp

Hy everyone and thanks for the continuous feedback. I know there are lot of things to fix, But I'm out of this for a while, sorry for the bugs and the lack of updates
(If this comment was disrespectful, please report it.)

 
2/15/2005 3:10:39 AMBroken Arrow

Can you make a new property to return the number of groups? Like .GroupCount or .Groups.Count or whatever you like.
(If this comment was disrespectful, please report it.)

 
2/23/2005 12:41:40 PM

Please make the isExplorerBar.Font.Charset property to WORK PROPERLY because the bar does not show correctly international text even when the OS is set to the foreign languages such as arabic, farsi, russian, greek, chinese (rpc), chinese (simplified), japanese, etc. The lack of international support makes this code obsolete for millions on users worldwide.
(If this comment was disrespectful, please report it.)

 
4/1/2005 3:50:05 AMJoe Jordan

Hey fred, any chance we might be seeing a v2 of this excellent control? It's great stuff!!
(If this comment was disrespectful, please report it.)

 
4/1/2005 10:49:26 AMFred.cpp

I would love to, but Unfortunally I haven't the free time I used to have. But maybe on some vacations (this vacations I worked,so, just maybe later:( ...)
(If this comment was disrespectful, please report it.)

 
7/23/2005 4:27:34 PMAlex Flex

This also works on Win 9x, and then you have the win 9x style!!!!!!!!!!!!!! You saved me lots of time! Thanks!
(If this comment was disrespectful, please report it.)

 
8/2/2005 4:13:35 AMGuru Prasad

This realy a good work.but i face problem when change desktop to metalic in win-xp.in default blue desktop has no problem.
(If this comment was disrespectful, please report it.)

 
8/2/2005 12:15:41 PMFred.cpp

what problem do you have?
(If this comment was disrespectful, please report it.)

 
10/19/2005 4:47:55 AMNeil Ault

This is great. 5 globes from me! JUst one thing whould it be possible to add the ability to change the background that is being used. Rather than the themed gradient background we could select say just a single colour or something? Love it... keep it up :)
(If this comment was disrespectful, please report it.)

 
10/19/2005 11:28:52 AMFred.cpp

sorry, the development for this control has ended (and for all the others! :( )
(If this comment was disrespectful, please report it.)

 
10/21/2005 4:04:23 AMenmity

too said...
(If this comment was disrespectful, please report it.)

 
12/12/2005 7:26:37 PMZhu JinYong

set the 3rd parameter of DrawText API call
as -1 will solve Unicode (like Chinese)diaplay problem.
(If this comment was disrespectful, please report it.)

 
2/20/2006 4:51:49 PMHeriberto Mantilla Santamaria

Wow, fred is amazing, now support Unicode Text, what's the next.

Amigo realmente que gran actualización, no había visto que ahora soportaba Unicode text.

Recibe un cordial saludo desde Colombia.
(If this comment was disrespectful, please report it.)

 
10/19/2006 11:35:23 AMEd. P.

Great Job; and the result is beautiful.
Thanks for sharing
(If this comment was disrespectful, please report it.)

 
11/3/2006 4:50:07 AMray

great job! it is one of the best control i've ever seen.
(If this comment was disrespectful, please report it.)

 
6/26/2007 11:21:34 AMSteven Atkiss

Yeah, I Have To Say This Is Quite Brilliant.
(If this comment was disrespectful, please report it.)

 
11/5/2007 11:07:37 AM[])utch[]v[]aster

Hey fred, how hard would it be to make this control more customizable in the ways of colors? I REALLY like the Auto-detecting of the colors, but the colors are less than flattering when using Vista.
(If this comment was disrespectful, please report it.)

 
12/18/2007 5:25:00 AMNirojShakya

NEED TO TEST A LOT . BUT GREAT WORK. IS THERE KNOW BUG !.......
(If this comment was disrespectful, please report it.)

 
4/8/2008 10:09:35 PMzgj7712

Thanks for sharing!
bugs:
1,"AddGroup" can not add ico
2,"AddGroup" can not add backgroud picture
(If this comment was disrespectful, please report it.)

 
10/12/2009 6:17:16 PMJulio Rodolfo Andres

excelente amigo te felicito,como hago para deshabilitar un nombre que quede disable?,gracias.tu codigo me es muy util
(If this comment was disrespectful, please report it.)

 
12/19/2011 11:39:04 AMRob C

I appreciate you taking the trouble to make it simple to use (it's a single Control)
That alone is worth 5
(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.)
 

To post feedback, first please login.