Shell 15-05-2025, 12:13
Buenas a tod@s!.
Estoy intentando crear un ejemplo con Trayicon para comprenderlo de la forma más sencilla.
Pero no logro que el formulario se oculte al principio.
Desde la opción de menú del Trayicon logro que el formulario se muestre o no se muestre.
Pero desde que inicia la aplicación, está activo en el escritorio.
Os subo el ejemplo.
Vaya como ha mejorado el mostrar el código. Chapó administrador!
Saludos
Estoy intentando crear un ejemplo con Trayicon para comprenderlo de la forma más sencilla.
Pero no logro que el formulario se oculte al principio.
Desde la opción de menú del Trayicon logro que el formulario se muestre o no se muestre.
Pero desde que inicia la aplicación, está activo en el escritorio.
Código:
'Problema el formulario se muestra al inicio de la ejecución
Private TrayMenu As Menu
Private MenuMostrar As Menu
Private MenuSalir As Menu
Private TrayIcon1 As TrayIcon
Public Sub Form_Open()
'Crear el menú principal del tray icon
TrayMenu = New Menu(Me) As "TrayMenu"
'Crear el submenú "Mostrar"
MenuMostrar = New Menu(TrayMenu) As "MenuMostrar"
MenuMostrar.Text = "&Mostrar"
'Crear el submenú "Salir"
MenuSalir = New Menu(TrayMenu) As "MenuSalir"
MenuSalir.Text = "&Salir"
'Configurar el icono de la bandeja
TrayIcon1 = New TrayIcon As "TrayIcon1"
TrayIcon1.Icon = Stock["gambas"]
TrayIcon1.Tooltip = "Ejemplo básico con TrayIcon"
TrayIcon1.PopupMenu = TrayMenu.Name
TrayIcon1.Visible = True
'FIXME: Esto no funciona. El formulario no se ha abierto
Me.Hide() 'Ocultar el formulario al iniciar
End
Public Sub MenuMostrar_Click()
Me.Visible = Not Me.Visible
If Me.Visible Then
Me.Show()
Me.Raise
Me.SetFocus()
Endif
End
Public Sub MenuSalir_Click()
Me.Close()
End
Public Sub Form_Close()
If TrayIcon1.Visible Then TrayIcon1.Hide
TrayIcon1.Delete
End
Public Sub Form_Activate()
'¿ Necesito algo aquí ?
EndOs subo el ejemplo.
Vaya como ha mejorado el mostrar el código. Chapó administrador!
Saludos
Archivos adjuntos
Shordi 13-05-2025, 13:24
Aquí tenéis la demo de lo explicado en este hilo https://gambas-es.org/thread-1957.html , esta vez ejecutado por un usuario no-A real.
Shordi 13-05-2025, 13:21
Cómo conseguir que un programa ejecutado por un usuario no Administrador realice tareas propias de un Administrador. Explicación y demo.
Bienvenido, Invitado
Últimos temas
Paren...WAIT !!!
Foro: Aplicaciones/Fragmentos de CódigoÚltimo mensaje por: guizans, 25-08-2025, 14:49
Respuestas: 3 - Vistas: 148
Gambas y Wayland
Foro: GeneralÚltimo mensaje por: guizans, 20-08-2025, 13:56
Respuestas: 6 - Vistas: 255
Odio a gb.Report
Foro: GeneralÚltimo mensaje por: guizans, 19-08-2025, 10:40
Respuestas: 8 - Vistas: 580
Devorado por la malvada s...
Foro: PythonÚltimo mensaje por: tercoide, 12-08-2025, 23:58
Respuestas: 6 - Vistas: 362