Comunidad Gambas-es

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.

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í ?

End

Os subo el ejemplo.

Vaya como ha mejorado el mostrar el código. Chapó administrador!

Saludos

Archivos adjuntos

EjemploBaseConTrayIcon-0.0.1.tar.gz (Tamaño: 8.82 KB Descargas: 1)

General Respuestas 10

Como conseguir poderes de Super Vaca: demo

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.

Videotutoriales Sin respuestas

Cómo conseguir poderes de Super Vaca

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.

Videotutoriales Sin respuestas

Páginas (572): 1 … 17 18 19 20 21 … 572

Bienvenido, Invitado

Buscar en los foros

Estadísticas del foro

Miembros: 311

Último miembro: Rober

Temas del foro: 1,765

Mensajes del foro: 9,166

Últimos temas

Presentación de gbpublish...

Foro: General
Último mensaje por: guizans, 02-06-2026, 21:34
Respuestas: 5 - Vistas: 521

Gambas 3.21.1

Foro: Mundo Linux
Último mensaje por: jguardon, 20-05-2026, 22:29
Respuestas: 1 - Vistas: 322

Problema con instalación ...

Foro: WebApp/WebForms
Último mensaje por: guizans, 19-05-2026, 18:54
Respuestas: 1 - Vistas: 359

Problema con el repósito ...

Foro: Instalación
Último mensaje por: guizans, 14-04-2026, 21:38
Respuestas: 2 - Vistas: 646

UEFI y BIOS

Foro: Hardware & IoT
Último mensaje por: guizans, 13-04-2026, 21:22
Respuestas: 3 - Vistas: 2,804

Portal