?
Solved

pop-up

Posted on 2000-02-18
8
Medium Priority
?
469 Views
Last Modified: 2013-11-28
Is there a way to have a pop-up menu when you press the right mouse down. I know how it is working with the menu editor in vb. But I want this pop-up menu everywhere in the programm. Of course I can put it in every form but when they press on a tabblad which is on that form nothing happens. In this pop-up menu I want e.g. an euro calculator, a normal calculator and a calender. Any idee
0
Comment
Question by:rossel
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 3
8 Comments
 
LVL 6

Expert Comment

by:Marine
ID: 2536835
YOu are not required to have this code in every form. You can have it one form and let it be called from that form. The other method of doing is to design the menu in the run-time. You can use Control Collection to create a menu one limitation i would think of doing is that it may not allow you to create submenu items i think they only can be created during a runtime. However you can use an API functions to create this. Its some subclassing not really an easy part to do. Your easiest way of doing is to do it on a separte form
0
 
LVL 1

Expert Comment

by:okcman
ID: 2537299
Private Sub lblLabel_MouseUp(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
   If Button = vbRightButton Then
      controltype = "label"
      frmMain.PopupMenu mnuPopUpLabelAttributes
   End If
End Sub


This is the code you would use to make a "right button click" on a label  using the menu editor  tool you would make a label such as I have here "mnuPopUpLabelAttributes" underneath the rest of your other normal menus- the only difference is that you make its property invisible(visible is not checked) and put your subdivisions such as calender and etc underneath appropriately this will allow you to call  the frmMain.PopupMenu  mnuyourlabel with the right mouse button.......
0
 
LVL 1

Accepted Solution

by:
okcman earned 200 total points
ID: 2537315
&File
....&Quit
&Help
....&Help
&Attributes      <-this one invisible
....Calender
....Calculater
....My Special Function

A little further discussion of this to clarify in the menu editor, &attributes is the name I chose for mnuPopUpLabelAttributes - this is the spot where everything underneath will show up...but itself wont show up....
dont forget to mark the spot where you want to show in the popup menu by marking it invisible.....
0
VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

 
LVL 1

Expert Comment

by:okcman
ID: 2537321
Private Sub lblLabel_MouseUp(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
   If Button = vbRightButton
      frmMain.PopupMenu mnuPopUpLabelAttributes
   End If
End Sub

some corrected code the controltype="label" was for some other project I did....
0
 
LVL 6

Expert Comment

by:Marine
ID: 2537330
I can send you a code usinsg API which is a nice code its not required you to use Menu Editor. and whats good about it is that you can put in in a module some place and call it from whatever you want. Its rather big to past it here. If you give me your email i'd be glad to send it to you.
0
 
LVL 1

Expert Comment

by:okcman
ID: 2539095
hey are you there rossel?
0
 

Author Comment

by:rossel
ID: 2540463
In the solution from okcman you need to place a piece of code on every form and even on every object. I know that way. What I need is a kind of general call to a function wich gives the pop-up.
My email is r.rossel@modulo.nl
0
 
LVL 6

Expert Comment

by:Marine
ID: 2540487
Ok, I've sended you that exaple.Very nice code it was originally written by Klaus person. Nice code as well.
0

Featured Post

Enhanced Intelligibility Without Cable Clutter

Challenge: The ESA office in Brussels wanted a reliable audio conference system for video conferences. Their requirement - No participant must be left out from the conference and the audio quality must not be compromised.

Question has a verified solution.

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

Marketers need statistics and metrics like everybody else needs oxygen. In this article we explain how to enable marketing campaign statistics for Microsoft Exchange mail.
Owning a franchise can be the dream of a lifetime. It provides a chance for economic growth. You can be as successful as you want.  To make your franchise successful, you need to market it successfully. Here are six of the best marketing strategies …
An overview of how to create reports in Adobe Analytics (formerly Omniture Site Catalyst) using pageNames, events, eVars and props. This video will show you how to install the Omniture Debugger tool so can see (and test) what is being passed int…
Learn how to set-up PayPal payment integration in your Wufoo form. Allow your users to remit payment through PayPal upon completion of your online form. This is helpful for collecting membership payments, customer payments, donations, and more.
Suggested Courses

719 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