Portal    Foro    Buscar    FAQ    Registrarse    Conectarse

Portal » Foro » Gambas » Aplicaciones/Fragmentos de Código

Fecha y hora actual: Domingo, 28 Abril 2024, 08:42 • Todas las horas son UTC + 1 Hora
Ver tema anterior Temas recientes Habilitar biblioteca Descargar tema Versión imprimible Correo a un amigo Ver siguiente tema

Conocer El VisibleName Y El ID De Una Ventana


Publicar nuevo tema  Responder al tema  		Página 1 de 1
 
 
Conocer El VisibleName Y El ID De Una Ventana
Autor Mensaje
Desconectado vuott Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: Agosto 2013
Mensajes: 2086
Edad: 60
Ubicación: italia.png
 
 
Responder citando   Descargar mensaje  
Mensaje Conocer El VisibleName Y El ID De Una Ventana 
 
Hola amigos,
aquí un breve y muy simple código para conocer la propriedad .VisibleName y el numero Id de las ventanas que se encuentran en el desktop.
Se necesita activar los componentes gb.desktop  y  gb.desktop.x11, y poner un Timer y una TextArea.
Funciona haciendo clic sobre una ventana de un programa (...tambien el desktop es una ventana !). El código no puede conocer las ventanas abiertas despues de este código.
 
Public Sub Form_Open()

  With Timer1
    .Delay = 100
    .Start
  End With

End
  

Public Sub Timer1_Timer()

  Dim dw As DesktopWindow
  Dim c As Integer
  
  c = Desktop.ActiveWindow

  With dw = New DesktopWindow(c)
    TextArea1.Text = .VisibleName & " = " & Hex(.Id)
  End With

End

 



 
última edición por vuott el Jueves, 04 Septiembre 2014, 11:40; editado 2 veces 
#1  Domingo, 13 Julio 2014, 17:00
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Desconectado Shell Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: Marzo 2010
Mensajes: 5278
Edad: 53
Ubicación: spain.png Al otro lado de la pantalla
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Conocer El VisibleName Y El ID De Una Ventana 
 
Hola Vuott.

En algún momento de cambiar de ventana y usar la barra de desplazamiento del TextArea me ha dado un
mensaje de error de XWindows, pero ahora no lo hace. Habría que probarlo mas.

Saludos
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
#2  Domingo, 13 Julio 2014, 23:55
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Conocer Id, Nombre De La Ventana Y PID De ... vuott Aplicaciones/Fragmentos de Código 2 Sabado, 01 Noviembre 2014, 21:56 Ver último mensaje
vuott
No hay nuevos mensajes Ventana Secundaria No Aparece Si La Ventan... v3ctor General 2 Sabado, 28 Marzo 2015, 20:22 Ver último mensaje
jguardon
No hay nuevos mensajes Conocer Tamaño Del Block Device vuott Aplicaciones/Fragmentos de Código 6 Martes, 08 Marzo 2016, 23:50 Ver último mensaje
vuott
No hay nuevos mensajes ¿Cómo Conocer La Clase De Un Objeto? shordi General 3 Jueves, 10 Noviembre 2016, 00:40 Ver último mensaje
vuott
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Portal » Foro » Gambas » Aplicaciones/Fragmentos de Código

Fecha y hora actual: Domingo, 28 Abril 2024, 08:42 • Todas las horas son UTC + 1 Hora
Ver tema anterior Temas recientes Habilitar biblioteca Descargar tema Versión imprimible Correo a un amigo Ver siguiente tema

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

 
Lista de permisos
No puede crear mensajes
No 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


  

 
cron