elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Únete al Grupo Steam elhacker.NET


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Menus emergentes
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Menus emergentes  (Leído 1,005 veces)
IP3

Desconectado Desconectado

Mensajes: 73


Ver Perfil
Menus emergentes
« en: 22 Noviembre 2006, 18:40 pm »

Bueno, estoy un poco tenso ya que es mi primer tutorial, pero se apañarmelas :P

Bueno, este tutorial sirve para que salgan menus emergentes al dar click a algun comando (VB6) Bien, es muy simple.

Creamos un menu, yo le pondre de nombre "MnuEjemplo" y de submenu le pondremos otro de prueba, con el nombre que queremos, ya que este no lo usaremos.

Vamos al "Click" o "Mousedown"o el que queramos, del formulario (Puede ser MDI) y en el código insertamos
Citar
popupmenu
que quiere decir que al dar click se abrira un popup, luego nos pide el nombre del menu, en este caso seria "MnuEjemplo" Ahora si lo ejecutamos, obviamente saltara el menu al dar un click.

Pero si aun queremos especificar más donde queremos que se posicione, le hemos de insertar las coordenadas, para ello usaremos las coordenadas X, Y obviamente. De coordenada, ponemos el numero que nos apetezca, yo por ejemplo pondre 0, luego hemos de especificar la W y la Y, de W yo usare este "FrmMain.ScaleWidth", tambien podemos y usar un número y de Y pondre por ejemplo "FrmMain.ScaleHeight", en el tambien podemos especificar un número, esto nos quedaria al extremo derecho y abajo del formulario, pero si queremos que se nos quede justo a la mitad, lo dividimos por 2

Ejemplo

Citar
PopupMenu MnuEjemplo, 0, FrmMain.ScaleWidth, MnuEjemplo.ScaleHeight
Esto es todo para hacer saltar tu menu emergente


En línea

PepiX

Desconectado Desconectado

Mensajes: 15



Ver Perfil
Re: Menus emergentes
« Respuesta #1 en: 22 Noviembre 2006, 19:30 pm »

yo preferiria usar el comando en el suceso MouseUp..
la diferencia esta en que si dejas pulsado el click y desplazas el puntero a otra direccion levanta el popup recien al soltar el click..
con el MouseDown te despliega de inmediato.
en sintesis depende de la funcion que cumplirá


En línea

--- los locos abren los caminos que más tarde recorrerán los sabios ---
WarGhost
I love basket


Desconectado Desconectado

Mensajes: 1.070



Ver Perfil WWW
Re: Menus emergentes
« Respuesta #2 en: 23 Noviembre 2006, 00:07 am »

si lo mejor es ponerlo en MouseUp es lo q yo ago ;)
En línea

¿Qué culpa tengo yo de tener la sangre roja y el corazón a la izquierda?
CeLaYa


Desconectado Desconectado

Mensajes: 543



Ver Perfil
Re: Menus emergentes
« Respuesta #3 en: 23 Noviembre 2006, 21:46 pm »

yo me he encotrado que no siempre funciona lo del popupMenu y después de mucho investigar encontre que es un bug de visual para que funcione bien habría que poner:


MnuEjemplo.visible = false
MnuEjemplo.visible = true
PopupMenu MnuEjemplo, 0, FrmMain.ScaleWidth, MnuEjemplo.ScaleHeight
En línea

"La soledad es el elemento de los grandes talentos".
Cristina de Suecia (1626-1689) Reina de Suecia.
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
El mercado de PC cae un 7 % a causa de las economías emergentes
Noticias
wolfbcn 1 1,013 Último mensaje 10 Enero 2014, 18:32 pm
por crazykenny
Anuncian el término de Wikipedia Zero en países emergentes
Noticias
wolfbcn 0 705 Último mensaje 19 Febrero 2018, 15:17 pm
por wolfbcn
Anuncios emergentes
Seguridad
chus0 1 821 Último mensaje 19 Diciembre 2018, 19:37 pm
por MCKSys Argentina
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines