Buenos días,
estoy investigando pero creo que no es posible. Estoy intentando hacer que cuando pase el ratón por encima de un menú o submenú, etc. Rellenar el text de un Label destinado para información Información. Tan pronto como pase el ratón por encima se active ese evento.
Lo he conseguido para un botón, por ejemplo tras el evento _Enter o _Leave. Pero veo que el menu no hereda estas propiedades de control y evento, sólo tiene 3 _Click _Hide y _Show. ¿No hay más? ¿No se puede hacer alguna historia para que tenga esos controles de evento? Como crear una librería de SuperMenu o algo así.
http://gambaswiki.org/wiki/comp/gb.qt4/menu
http://gambaswiki.org/wiki/comp/gb.qt4/button
Muchísimas gracias.
Menu Editor Y Herencia Del Control Event
Objetivo: Re: Menu Editor Y Herencia Del Control Event
...ad exemplum con un Balloon (hace falta crear al menos una voz de Menu):
Private tm As Timer
Public Sub Form_Open()
With tm = New Timer As "Tempus"
.Delay = 50
.Start
End With
End
Public Sub Tempus_Timer()
Dim rt As New Rect(Me.ScreenX + 10, Me.ScreenY + 10, Me.Font.TextWidth(Menu1.Caption), Me.Font.TextHeight(Menu1.Caption))
If rt.Contains(Mouse.ScreenX, Mouse.ScreenY) Then Balloon.Info("Mus intravit !", Me, 10 + (Me.Font.TextWidth(Menu1.Caption) / 2), 5)
End
Public Sub Form_Open()
With tm = New Timer As "Tempus"
.Delay = 50
.Start
End With
End
Public Sub Tempus_Timer()
Dim rt As New Rect(Me.ScreenX + 10, Me.ScreenY + 10, Me.Font.TextWidth(Menu1.Caption), Me.Font.TextHeight(Menu1.Caption))
If rt.Contains(Mouse.ScreenX, Mouse.ScreenY) Then Balloon.Info("Mus intravit !", Me, 10 + (Me.Font.TextWidth(Menu1.Caption) / 2), 5)
End
Objetivo: Re: Menu Editor Y Herencia Del Control Event
MenuExtra.tar.gz | ||
Descripción: | Descargar |
|
Nombre del archivo: | MenuExtra.tar.gz | |
Tamaño: | 35.67 KB | |
Descargado: | 134 veces |
MenuExtra.tar.gz | ||
Descripción: | Descargar |
|
Nombre del archivo: | MenuExtra.tar.gz | |
Tamaño: | 35.67 KB | |
Descargado: | 134 veces |
MenuExtra.tar.gz | ||
Descripción: | Descargar |
|
Nombre del archivo: | MenuExtra.tar.gz | |
Tamaño: | 35.67 KB | |
Descargado: | 134 veces |
Objetivo: Re: Menu Editor Y Herencia Del Control Event
Este ejemplo me ha venido genial, muchísimas gracias!
vuott escribió:
Este ejemplo me ha venido genial, muchísimas gracias!
Objetivo: Re: Menu Editor Y Herencia Del Control Event
Si, la historia es hacer que cuando pases el ratón por encima de uno de esos menús (y submenús), se active un evento de ratón para modificar por ejemplo un label, donde voy poniendo información.
cogier escribió:
Si, la historia es hacer que cuando pases el ratón por encima de uno de esos menús (y submenús), se active un evento de ratón para modificar por ejemplo un label, donde voy poniendo información.
Objetivo: Re: Menu Editor Y Herencia Del Control Event
Por favor, pruebe el programa. Esto es exactamente lo que hace.
Objetivo: Re: Menu Editor Y Herencia Del Control Event
Buenas Cogier,
muchas gracias por el fuente, lo he cargado en mi gambas y con lo novato que soy aun con este lenguaje, no consigo hacerlo correr.
Parece un tema de componente con PictureBox a la hora de ejecutar la clase main.
cogier escribió:
Buenas Cogier,
muchas gracias por el fuente, lo he cargado en mi gambas y con lo novato que soy aun con este lenguaje, no consigo hacerlo correr.
Parece un tema de componente con PictureBox a la hora de ejecutar la clase main.
Objetivo: Re: Menu Editor Y Herencia Del Control Event
Nada, eliminé el elemento PictureBox y creé uno nuevo igual.
El ejemplo es muy bueno, muchísimas gracias!
mateobadajoz escribió:
Nada, eliminé el elemento PictureBox y creé uno nuevo igual.
El ejemplo es muy bueno, muchísimas gracias!
Página 1 de 1
No puede crear mensajesNo puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario
Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.
Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo
Página generada en:: 0.585s (PHP: -81% SQL: 181%)
Consultas SQL: 47 - Debug off - GZIP Activado