|
| Submitted on: |
8/14/2000 10:53:31 PM |
| By: |
Olivier Martin
|
| Level: |
Advanced |
| User Rating: |
By 43 Users |
| Compatibility: |
VB 5.0, VB 6.0 |
| Views: |
35816 |
|
|
|
|
|
Real Office and Visual Studio like icon menus
New features :
-White bug fixed
-Pattern behind simple checks
-Main menu bar repop bug fixed in W98
-RightToLeft property (still to be tested)
|
 |
| |
|
 Download 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:
- 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.
|
Other 2 submission(s) by this author
|
|
Report Bad Submission
|
Your Vote
|
| |
Other User Comments
|
 8/14/2000 11:24:47 PM: chris
Good job.You will get an excelent from me!!
(If this comment was disrespectful, please report it.)
|
8/14/2000 11:39:19 PM: Wayne Hartell
Man - the code looks great, but the check and option buttons don't work when I run this - I just get white squares and circles....
(If this comment was disrespectful, please report it.)
|
8/15/2000 2:16:59 AM: Rob Bogdanoff
Top Level menu items that are disabled
do not display properly. Problem is
in prior versions also.
Rob
(If this comment was disrespectful, please report it.)
|
8/15/2000 5:59:16 AM: Dragonrider15
Your code just seems to get better and better. I have kept up with it since you released the first version of it. But you still have yet to send me a reply about the bit of code I sent you in regards to the CoolMenu. Please help me out and reply. If you haven't received it, please email me with an email address to send it to.
Thanks,
Dragonrider15
(If this comment was disrespectful, please report it.)
|
8/15/2000 11:48:06 AM: MarceQ
No pues tu código es de los mejores que he visto, con él pude hacer lo que siempre había soñado, de poner los iconitos en los menús.
¡Gracias por compartirlo!
(If this comment was disrespectful, please report it.)
|
8/15/2000 3:47:22 PM: Dan Redding
Great Code! Since you've obviously spent a lot of time working w/ the Menu APIs, I'll ask you this: Do you know how to make a menu sit in a 'CoolBar' control? Reply to Dan@blueknot.com, please; much appreciated!
(If this comment was disrespectful, please report it.)
|
8/15/2000 7:42:55 PM: Olivier Martin
The White bug... I'm still working on it but it doesn't do it on my system.
I posted a new version of the code, try it and send feedback.
The main menu item disable bug will be fixed soon. I wasn't aware of it.
Dragon, I'm sure I didn't lost you're e-mail, I'll find it and reply.
I don't read Spanish very well, I'll translate and get back on you
To make a menu on a CoolBar, you have to use popups and API. A
complete vb CoolBar is my next project.
(If this comment was disrespectful, please report it.)
|
8/16/2000 1:02:47 PM: MarceQ
Bajé de nuevo el código y ahora si... En mi sistema funciona a la perfección.
(If this comment was disrespectful, please report it.)
|
8/21/2000 2:24:59 PM: Pete Sral
Excellent code!!! If it is no trouble to you please keep me posted on any updates, etc. I have converted the code you submitted into a DLL and will use it in all my projects and would love to be kept up to date on bugs and enhancements! Thanks again and great job!!!
(If this comment was disrespectful, please report it.)
|
9/5/2000 1:47:10 AM: S.Gilman
Great code! I've run into one problem though.. When I transfered the code over to my project, I get an illegal operation upon exiting the program, and when compiled the program hangs. I can't figure it out.. Any ideas?
(If this comment was disrespectful, please report it.)
|
9/5/2000 5:51:27 PM: S.Gilman
Okay.. I fixed the crash by removing the End statement from the MDIForm_Unload event, but now the application won't exit. I know that I have all forms unloaded, but it just won't exit.
(If this comment was disrespectful, please report it.)
|
9/10/2000 10:51:14 AM: John Wei
What an excellent code ! But you may check out the code released by www.vbaccelerator.com. They always released such code espeacially what the Microsoft do ! If you don't mind, email me when you release a new code ! My email is john_wei_86@hotmail.com
(If this comment was disrespectful, please report it.)
|
9/16/2000 11:20:20 AM: opello
Hey, I thought i'd translate that for you ppl on here ...
-----------------------
First:
------
Your code is the best that I have seen. With it I can do what I have always dreamed of, put icons in the menus. Thank you for sharing it!
-----------------------
Second:
-------
I tried the code again, and it worked perfectly.
-----------------------
*NOTE* These are just what I believe they are with my knowledge of Spanish. Please don't flame me if they are wrong :)
(If this comment was disrespectful, please report it.)
|
9/16/2000 11:22:44 AM: opello
psc mutilated it :(
(If this comment was disrespectful, please report it.)
|
9/16/2000 5:45:41 PM: depresion
S.Gilman I'm waiting for it to download but it may be that this uses hooking look for an un hook in the code's unload. just an idea i'll have a look when it gets here.
(If this comment was disrespectful, please report it.)
|
9/18/2000 1:30:35 PM: MarceQ
THIS COMMENT IS FOR OPELLO!
¡Que tal!
Ya veo que tradujiste el comentario que dejé acerca del Cool Menú. Sólo quería decirte que tu traducción es excelente, nadie puede quejarse al respecto y menos yo, siendo el autor original. ¡Saludos desde México!
(If this comment was disrespectful, please report it.)
|
9/25/2000 8:00:24 AM: Mark Robert Strange
All I can say is....Exquisite. Very well done. =)
(If this comment was disrespectful, please report it.)
|
11/5/2000 6:45:31 PM: matt_man22
Is there a way to make the menu send a click event for a seperator? I can not seem to find anything on it. I am using CoolMenu in my project. Any suggestions? Thanks.
Matt
(If this comment was disrespectful, please report it.)
|
11/14/2000 1:37:05 PM: Michael Hiatt
Thanks! works great in my project.
hiatt@cira.colostate.edu
(If this comment was disrespectful, please report it.)
|
12/16/2000 2:47:44 AM: R. martin
Hi, everybody
I am working on the backgroud color ans other color but it seem that ist not easy ;-)
Well if anybody know how to change the backcolor please tell it !
BACK_COLOR = 5 ' this put the backgroud white but only the parts whit menu the right part stay the same color of the system color !
So can we replace the fuction getsystemcolor for a color that we can put in the back_color constant ?
Sory for my poor english i am french !
(If this comment was disrespectful, please report it.)
|
1/26/2001 5:25:28 PM: Glenn Chittenden Jr.
This is excellent. Good job.
One request would be to allow an image to be tiled as the background. I'm going to see if I can add that myself, but if you already know how it would be that much better.
Keep up the good work.
(If this comment was disrespectful, please report it.)
|
2/19/2001 5:34:20 PM: Herman Eldering
Hi, I solved the disabled-top-menu problem couple of months ago and mailed it to Olivier. But I noticed he hasn't uploaded it yet... so I've done it. Just search for Coolmenu 1.3.1
(If this comment was disrespectful, please report it.)
|
2/24/2001 10:23:24 PM: Greg C.
This is great code but what code do I use to make those neet seperators??
A reply would be great!
(If this comment was disrespectful, please report it.)
|
4/22/2001 3:23:50 AM: Tricera
This code is fantastic. Just a little bug under Win2K: if you just move the mouse over menu bar, without clicking, main menus don't pop as they would. Any idea? trax102@hotmail.com
In any case Excellent rating by me.
(If this comment was disrespectful, please report it.)
|
4/22/2001 10:29:05 AM: Olivier Martin
I received a lot of feedback lately. I think I'll get back to it. Expect a post this summer. Please, email to kick by lazy butt.
Tricera,
the code was never tested under W2k. I'll see what I can do
(If this comment was disrespectful, please report it.)
|
5/13/2001 12:30:00 AM: Greg C.
MDI BUG, if the child windows is maximazed and you use the "MDI Menu Icon" it is all messy and corupted, any ideas? I would love to use the on a MDI app!
(If this comment was disrespectful, please report it.)
|
5/13/2001 12:32:31 AM: Greg C.
Did you ever finish the "CoolBar" Control?
Thanks,
I will stop bothering you for now!! :)
(If this comment was disrespectful, please report it.)
|
5/22/2001 12:41:45 AM: matt_man22
Hey Oliver! Any plans to make Cool Menu Office XP style? I would do it myself, but can't find a way to get the shadow of the picture. Just wondering.
-Matt
(If this comment was disrespectful, please report it.)
|
5/23/2001 10:15:33 PM: VBfool
yes, A complete Office XP coolmenu/docking toolbar code would be nice, but a little to much coding for me!
(If this comment was disrespectful, please report it.)
|
5/29/2001 3:38:06 AM: Iradicoder
Very nice. Is there a way I can check for a right mouse button click on a menu item so I can use a context menu? Like Internet Explorer's Favorites menu?
(If this comment was disrespectful, please report it.)
|
5/29/2001 3:41:34 AM: Iradicoder
Very nice. Is there a way I can check if the right mouse button is clicked on a menu item so I can bring up a context menu? Like in internet explorer's Favorites menu? Thanks.
(If this comment was disrespectful, please report it.)
|
6/22/2001 1:32:29 PM: BAPWorld
Can you email me a simplified version of your code, that only shows how to change the color of the text. Thank you for your time. Awesome code.
(If this comment was disrespectful, please report it.)
|
7/11/2001 5:17:11 AM: Enzo
It compliments for your class menu, why you do not supply to ampliarla and renderla similar to the XP
(If this comment was disrespectful, please report it.)
|
9/3/2001 3:15:00 PM: Troy
I love the effects which this code can create, but adding 5 different files to my project is way too much overhead for me. How are chances that version 1.4 can be turned into a COM object or an ActiveX control, thus shrinking it all into one file?
I'd love to get updates.
TroyShark@aol.com
(If this comment was disrespectful, please report it.)
|
9/4/2001 8:43:44 PM: Nisco
I dunno if you updated it, but if you use end it crashes.
(If this comment was disrespectful, please report it.)
|
10/1/2001 4:48:43 PM: Tienus
I recently upgraded to Windows XP and that's when all the trouble started. I can't get the pictures in the menu's anymore. When I use the program on a Windows 9x machine, there's no problem, but I would really like it to be compatible with XP. By the way: the optionbuttons and checkboxes are working fine.
Does anybody have an idea what could be wrong? I'm getting pretty desperate over here ; )
Maybe somebody cab find the time to help me out on this. Not just for me, but for all the other guys that will probably upgrade to Windows XP one of these days/months/years(*).
(If this comment was disrespectful, please report it.)
|
10/26/2001 3:55:10 AM: MarcoN
Great work!
Just a remark: if you use the coolMenu in a MDI environment, the "system menu" of the MDI child is also sublclassed when the child is maximized. So, after a few clicks nothing works anymore.
Everything works fine if the child is NOT maximized.
Thanks for any help you could provide me.
Regards.
(If this comment was disrespectful, please report it.)
|
11/15/2001 9:34:12 PM: weixingxing
Great work! thanx u very much!
but , there is a question:
when i use Chinese Char (Code Page:936) in menu Caption , the char of menu caption can not be recognised.
what can i do ?
(If this comment was disrespectful, please report it.)
|
4/30/2002 5:48:39 AM: Nick Spliff
Excellent work mate, but i've found an important bug that nobody else has mentioned here.
The trouble is that you cannot have any menu items on the same form that have similar captions.
For example...
A menu item captioned "Windows Media Player" will have the same picture created as a menu item captioned with "Windows".
This is purely using simple menu captions, and not with the extra settings that would normally have been separated with a |. Is this the problem?
I'd really appreciate it if you could correct this cuz i've scanned thru the code and can't find anything like it.
Thanks Martin.
Nick
(If this comment was disrespectful, please report it.)
|
4/30/2002 5:58:54 AM: Nick Spliff
One more thing i've just noticed about that little caption bug.
This works perfectly with menu items that you have given a keyboard shortcut (example Ctrl+C), but without a shortcut... the bug occurs.
Thanks again.
Nick
(If this comment was disrespectful, please report it.)
|
8/9/2002 10:56:35 AM: Ivan
I get white menu on My XP Pro at home (VB6sp5) and It works fine with W2k Pro at work(VB6sp5) Hope it helps you to fix it.
Other then that, excellent job on this!
(If this comment was disrespectful, please report it.)
|
9/25/2002 6:15:35 AM:
Hey, how about not using the common control OCX[specific:imagelist control] file to be able to display the icons in the menu
(If this comment was disrespectful, please report it.)
|
1/1/2003 7:23:35 AM: Jason Messersmith
can you make one without the modules?
(If this comment was disrespectful, please report it.)
|
2/9/2003 5:37:31 PM:
* Superb menus!!! *
...but i've gotten pretty annoyed by the missing pictures in XP - so i decided to find the course of it! And quite accidently I did! I tried replacing the Common Control 6.0 ImageList with the Common Control 5.0 ImageList - and then it worked!
So, if your having problems with menupictures the USE COMMOM CONTROL 5.0 INSTEAD OF COMMON CONTROL 6.0! Well, that should be clear :)
Othervice completly amazing menus - thanks a bunch!
-Sion
(If this comment was disrespectful, please report it.)
|
2/11/2003 6:24:15 PM:
By the way; is it posible to change the size of the text in the split-lines?
(If this comment was disrespectful, please report it.)
|
3/10/2003 12:18:55 AM:
Could you please tell me How can I change Font at run time ? I hope you help ( Email: bunsomesa@yahoo.com )
(If this comment was disrespectful, please report it.)
|
9/29/2003 10:22:42 PM: Josh *Acecool* M
Amazing, 5 globes
(If this comment was disrespectful, please report it.)
|
6/3/2005 8:25:37 AM: Andrew Giannaros
'CreateFont - added by me for better and complete font style
Private Declare Function CreateFont Lib "gdi32" Alias "CreateFontA" _
(ByVal H As Long, ByVal W As Long, ByVal E As Long, ByVal O As Long, _
ByVal W As Long, ByVal I As Long, ByVal U As Long, ByVal S As Long, _
ByVal C As Long, ByVal OP As Long, ByVal CP As Long, ByVal Q As Long, _
ByVal PAF As Long, ByVal F As String) As Long
Public hFont As Long 'added from me to apply complete font
into install function add this:
' bold, Italic,under line,strikeout
' | | | |
' \ \ / _______/
' \ \ / /
hFont = CreateFont(16, 0, 0, 0, 1000, 0, 0, 0, 0, 0, 0, 0, 0, "Tahoma")
and change in DrawMenuText function:
OldFont& = SelectObject(hdc&, hFont)
(If this comment was disrespectful, please report it.)
|
6/25/2006 12:48:02 PM: CeritGroupIT
Good job but white bug is still going on though it is said to be fixed (XP SP2)
(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.
|
