Menu Editor Y Herencia Del Control Event


Subject: Menu Editor Y Herencia Del Control Event
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.

Profile PM  
Subject: 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

Profile PM  
Subject: Re: Menu Editor Y Herencia Del Control Event
¿Es este el tipo de menú que estás buscando?

menuextra


MenuExtra.tar.gz
Description:  
Download
Filename: MenuExtra.tar.gz
Filesize: 35.67 KB
Downloaded: 133 Time(s)
MenuExtra.tar.gz
Description:  
Download
Filename: MenuExtra.tar.gz
Filesize: 35.67 KB
Downloaded: 133 Time(s)
MenuExtra.tar.gz
Description:  
Download
Filename: MenuExtra.tar.gz
Filesize: 35.67 KB
Downloaded: 133 Time(s)

Profile PM  
Subject: Re: Menu Editor Y Herencia Del Control Event
vuott escribió:  
...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



Este ejemplo me ha venido genial, muchísimas gracias!

Profile PM  
Subject: Re: Menu Editor Y Herencia Del Control Event
cogier escribió:  
¿Es este el tipo de menú que estás buscando?

menuextra



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.

Profile PM  
Subject: Re: Menu Editor Y Herencia Del Control Event
Por favor, pruebe el programa. Esto es exactamente lo que hace.

Profile PM  
Subject: Re: Menu Editor Y Herencia Del Control Event
cogier escribió:  
Por favor, pruebe el programa. Esto es exactamente lo que hace.


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.

captura_de_pantalla_2020_03_13_a_las_13_25_28


Profile PM  
Subject: Re: Menu Editor Y Herencia Del Control Event
mateobadajoz escribió:  
cogier escribió:  
Por favor, pruebe el programa. Esto es exactamente lo que hace.


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.

captura_de_pantalla_2020_03_13_a_las_13_25_28



Nada, eliminé el elemento PictureBox y creé uno nuevo igual.

El ejemplo es muy bueno, muchísimas gracias!

Profile PM  

Page 1 of 1


  
You cannot post new topics
You cannot reply to topics
You cannot edit your posts
You cannot delete your posts
You cannot vote in polls
You cannot attach files
You can download files
You cannot post calendar events

   

This is a "Lo-Fi" version of our main content. To view the full version with more information, formatting and images, please click here.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Generation Time: 0.091s (PHP: -16% SQL: 116%)
SQL queries: 24 - Debug Off - GZIP Enabled