Portal    Foro    Buscar    FAQ    Registrarse    Conectarse

¿ Qué Es El Escritorio ?.

¿ Qué Es El Escritorio ?.
Artículo
Responder citando    Descargar mensaje  
Mensaje ¿ Qué Es El Escritorio ?. 
 
Buenos días!.

¿ Una ventana , un contenedor ?.  

Tomemos el ejemplo de un control formulario y en su interior un control DrawingArea.
Al hacer esto:

Dim uncontrol As Control
  
  For Each uncontrol In Me.Controls  
    Print uncontrol.Name
    Print uncontrol.Parent.Name
  Next
 


Da como resultado:

Citar:

DrawingArea1
FMain


Entonces, yo puedo averiguar el nombre del contenedor de un control de la forma.

Control.Parent

Si el escritorio es el contenedor de FMain...
¿ Qué pasa si le digo ?.
Print FMain.Parent.Name
 


Da Objeto Nulo.

¿ Y si usamos ventanas ?.

Dim unaventana As Window

 For Each unaventana In Windows
    Print unaventana.Parent.Name
  Next
 


Igual.

Saludos



 
Shell - Ver perfil del usuario Enviar mensaje privado  
Shell [ Lunes, 28 May 2018, 08:10 ]
 


¿ Qué Es El Escritorio ?.
Comentarios
Responder citando    Descargar mensaje  
Mensaje Re: ¿ Qué Es El Escritorio ?. 
 
El Escritorio (desktop) es una normal ventana.

Prueba esto:

Public Sub Form_Open()

  Dim dw As DesktopWindow

    For Each dw In Desktop.Windows
      Print dw.Id, dw.Name
    Next

End




 
última edición por vuott el Lunes, 28 May 2018, 12:46; editado 1 vez 
vuott - Ver perfil del usuario Enviar mensaje privado  
vuott [ Lunes, 28 May 2018, 11:45 ]
Responder citando    Descargar mensaje  
Mensaje Re: ¿ Qué Es El Escritorio ?. 
 




 
última edición por vuott el Lunes, 28 May 2018, 12:46; editado 1 vez 
vuott - Ver perfil del usuario Enviar mensaje privado  
vuott [ Lunes, 28 May 2018, 12:45 ]
Responder citando    Descargar mensaje  
Mensaje Re: ¿ Qué Es El Escritorio ?. 
 
Vuott:

Funciona, pero tienes que añadir lo que falta.

Por ejemplo añadir el componente Gb.Desktop
Y en el código. Que por las abreviaturas aunque son breves para nombrar las variables,no olvides los tipos.

Public Sub Ejemplo2()
  
  Dim dw As DesktopWindow
  
  For Each dw In Desktop.Windows
    Print dw.Id, dw.Name
  Next
  
End
 


Y con eso logro ver esto:

Citar:

31457286        x-caja-desktop
56623121        Publicar una respuesta - Mozilla Firefox
65011727        FMain.class - CoordenadasFormulario 0.0.1 - gambas 3
16777219        Panel superior


Que por cierto . Hace tiempo hiciste un ejemplo con el id de las ventanas, pero usabas gb.desktop.gnome o gb.gnome.desktop
que ya  se encuentra anticuado.

Gratias ago.

Saludos



 
última edición por Shell el Lunes, 28 May 2018, 13:14; editado 1 vez 
Shell - Ver perfil del usuario Enviar mensaje privado  
Shell [ Lunes, 28 May 2018, 13:13 ]
Responder citando    Descargar mensaje  
Mensaje Re: ¿ Qué Es El Escritorio ?. 
 
Shell escribió: [Ver mensaje]
tienes que añadir lo que falta.


Cierto, eso estaba entendido.    



Shell escribió: [Ver mensaje]
Gratias ago.


Si vales bene est, ego valeo.



 
vuott - Ver perfil del usuario Enviar mensaje privado  
vuott [ Lunes, 28 May 2018, 14:35 ]
Mostrar mensajes anteriores:    
 
Publicar nuevo tema  Responder al tema  Página 1 de 1
 
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 



 

cron