Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Simular El Comportamiento Del Escritorio En Un Formulario
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Simular El Comportamiento Del Escritorio En Un Formulario 
 
Hola amigos que tal como están buena noches, les escribo porque tengo una duda que quisiera me ayuden a resolver, tengo un pequeño proyecto de desarrollo de software y quisiera simular mi formulario como si fuera el escritorio de un sistema operativo, es decir con iconos que al darle click abran otras ventanas, he intentado hacerlo con ToolButton agregándole imágenes pero no me da el resultado esperado, además el texto que le agrego como descriptor del icono me aparece al lado izquierdo del mismo, no debajo como yo quisiera. El tema esta que cada icono lo guardo en una base de datos y quisiera poder identificarlos con una etiqueta y una imagen que al clickearlos maneje ventanas distintas.
Les agradezco mucho desde ya por la ayuda que me puedan brindar.
Saludos.
 



 
inkarri - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Simular El Comportamiento Del Escritorio En Un Formulario 
 
La mejor manera es utilizando el control IconView.

Las añades así:

Public Procedure AddIcons()

  IconView1.Add("Clave", "Texto", Picture["path de la imagen correspondiente"])

End
 


Y esto pasa al hacer doble click a un ícono (según la clave, el formulario a mostrar):

Public Procedure IconView1_Dblclick()

  If Not IsNull(IconView1.Current) Then
    Select Case IconView1.Current.Key
      Case "una"
        una.Show()
      Case "dos"
        dos.show()
    End Select
  Endif

End


No sé si en Gambas2 se podrá usar, pero podrías añadir claves del mismo nombre que los forms que mostrarán, y de esta forma se simplifica lo último:

Public Procedure IconView1_Dblclick()
  
  Dim rForm As Form
  
  If Not IsNull(IconView1.Current) Then
    rForm = object.New(IconView1.Current)
    rForm.Show()
  Endif

End

 



 
última edición por Invitado el Viernes, 01 Julio 2011, 11:04; editado 2 veces 
 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Simular El Comportamiento Del Escritorio En Un Formulario 
 
Muchas gracias por la ayuda. Me ha sido de mucha utilidad.
 



 
inkarri - 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 Como Simular Un Intro pittusa General 1 Martes, 01 Junio 2010, 01:18 Ver último mensaje
fabianfv
No hay nuevos mensajes Simular Pulsación De Teclas aristicol Controles/Librerías/Componentes 4 Miercoles, 08 Diciembre 2010, 18:05 Ver último mensaje
shordi
No hay nuevos mensajes DrawingArea, Comportamiento Segun Gtk O Qt4 Shell Controles/Librerías/Componentes 1 Martes, 28 May 2013, 12:52 Ver último mensaje
jsbsan
No hay nuevos mensajes Comportamiento De ListBox, ComboBox Shell General 3 Sabado, 04 Julio 2020, 18:43 Ver último mensaje
Shell
 

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


 
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