Solved

Submenu highligh when hovered

Posted on 2014-01-18
7
227 Views
Last Modified: 2014-01-23
The vb6 menu editor would not produce results as show in the attachment.

The attachment is the screen shot of submenu being highlighted when mouse is hovered on it

How was it created?

Highlight-On-Submenu.docx
0
Comment
Question by:rohaya
  • 4
  • 3
7 Comments
 
LVL 42

Expert Comment

by:pcelba
ID: 39790971
Windows menus are almost always handled by Win32 API calls. You may call these Win32 functions from VB6 directly. Code samples are e.g. here: http://www.ex-designz.net/apicat.asp?apicat=34

The function of your interest cold be the TrackPopupMenu.

Another useful resource is e.g. here: http://visualbasic.about.com/od/usevb6/l/aa103002a.htm
or here: http://www.developerfusion.com/article/84350/dynamic-menus-amp-the-menu-api/
and here: http://patorjk.com/programming/vb6examples.htm
0
 

Author Comment

by:rohaya
ID: 39791066
Thanks for the references.

I'm not going for sofisticated api programming just to attain the not so crucial results.

It will just end up in crashes...

I would prefer to buy any third party ocx or dll if they are available

Thank you
0
 
LVL 42

Expert Comment

by:pcelba
ID: 39791176
Win32 API call does not mean sophisticated programming. It is just a simple way how to use the function implemented in OS but not available in your development tool.

Win32 API calls do not result in crashes if you provide correct parameters. OTOH,  OCX controls stability is not so good in many cases...

Above links contain many menu handling code samples so I believe it should be very easy to test and use them.

The menu without item highlighting seems to be a bug. What VB6 Service Pack do you use? And why do you stay with VB6? VB.NET is rather different but more modern development tool.
0
U.S. Department of Agriculture and Acronis Access

With the new era of mobile computing, smartphones and tablets, wireless communications and cloud services, the USDA sought to take advantage of a mobilized workforce and the blurring lines between personal and corporate computing resources.

 

Author Comment

by:rohaya
ID: 39791510
I'm using vb6 professional sp6. I do programming during my free time. I could not upgrade to .net because I have 10 years of code to upgrade.

I'm doing well with vb6, with controls such as igrid and chilkat.

Back to the menu highlighting. The sample from author dos, crashes before anything.

If you could help me to get one of the samples running, I would appreciate it. I might pay you if you have paypal account.

Thank you
0
 

Accepted Solution

by:
rohaya earned 0 total points
ID: 39791766
0
 
LVL 42

Expert Comment

by:pcelba
ID: 39791850
Great! Please mark your post as the solution.
0
 

Author Closing Comment

by:rohaya
ID: 39802553
Found solution
0

Featured Post

Use Case: Protecting a Hybrid Cloud Infrastructure

Microsoft Azure is rapidly becoming the norm in dynamic IT environments. This document describes the challenges that organizations face when protecting data in a hybrid cloud IT environment and presents a use case to demonstrate how Acronis Backup protects all data.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Does the idea of dealing with bits scare or confuse you? Does it seem like a waste of time in an age where we all have terabytes of storage? If so, you're missing out on one of the core tools in every professional programmer's toolbox. Learn how to …
Displaying an arrayList in a listView using the default adapter is rarely the best solution. To get full control of your display data, and to be able to refresh it after editing, requires the use of a custom adapter.
The viewer will learn how to simulate a series of coin tosses with the rand() function and learn how to make these “tosses” depend on a predetermined probability. Flipping Coins in Excel: Enter =RAND() into cell A2: Recalculate the random variable…

856 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question