Aplicaciones/Fragmentos de Código :: Explorador De Clases De Gambas

Portal

Foro

Buscar

FAQ

Registrarse

Conectarse

Fecha y hora actual: Domingo, 28 Abril 2024, 03:08 • Todas las horas son UTC + 1 Hora

Explorador De Clases De Gambas

Página 1 de 1

Explorador De Clases De Gambas

Autor

Mensaje

shordi

Analista Programador

Registrado: Septiembre 2009
Mensajes: 4982
Edad: 64
Ubicación:

Albacete

Explorador De Clases De Gambas

A raíz de una pregunta en el foro sobre

Citar:
"¿Hay una forma de obtener una lista de métodos o propiedades después del operador "." (punto) ?"

Me ha picado la curiosidad y he echado una tarde en hacer éste explorador de clases de gambas... que no sé muy bien para qué sirve por cuanto que (casi) toda esa información la ofrece el IDE, pero que me ha hecho pasar un buen rato haciéndolo.

El aspecto es éste

El código fuente este:

ExploraClases-0.0.1.tar.gz
Descripción:		Descargar
Nombre del archivo:	ExploraClases-0.0.1.tar.gz
Tamaño:	12.23 KB
Descargado:	43 veces

ExploraClases-0.0.1.tar.gz
Descripción:		Descargar
Nombre del archivo:	ExploraClases-0.0.1.tar.gz
Tamaño:	12.23 KB
Descargado:	43 veces

ExploraClases-0.0.1.tar.gz
Descripción:		Descargar
Nombre del archivo:	ExploraClases-0.0.1.tar.gz
Tamaño:	12.23 KB
Descargado:	43 veces

===================
No podemos regresar

#1 Miercoles, 08 Junio 2016, 20:10

tincho

Analista Programador

Registrado: Noviembre 2014
Mensajes: 2565
Edad: 48
Ubicación:

Re: Explorador De Clases De Gambas

Loco sos un groso de los grosos!!
Muy visual y fácil de navegar.
Intente aplicar parte de tu código para hacer una funcion que pasandole el nombre de la clase, por ejemplo "Desktop" devolviera una coleccion de clave,valor pero no lo logre.

Código: [Descargar] [Ocultar] [Seleccionar]

Public Function getClassSymbolData(strClassName As String) As Collection

  Dim cls1 As Class
  Dim strSymbol As String
  Dim strValue As String
  Dim ctnSymbol As New Collection
  cls1 = Classes[strClassName]
  For Each strSymbol In cls1.Symbols
    If cls1[strSymbol].Kind = Class.Property Then

      Print Str(cls1[strSymbol])

      ctnSymbol.Add(strValue, strSymbol)
    Endif
  Next
  Return ctnSymbol
End

Saludos.

#2 Miercoles, 08 Junio 2016, 21:57

tercoIDE

Analista Programador

Registrado: Noviembre 2013
Mensajes: 713
Edad: 54

Re: Explorador De Clases De Gambas

shordi esta oficialmente encendido

#3 Miercoles, 08 Junio 2016, 22:42

shordi

Analista Programador

Registrado: Septiembre 2009
Mensajes: 4982
Edad: 64
Ubicación:

Albacete

Re: Explorador De Clases De Gambas

Citar:
Intente aplicar parte de tu código para hacer una funcion que pasandole el nombre de la clase, por ejemplo "Desktop" devolviera una coleccion de clave,valor pero no lo logre.

No puedes imprimir un objeto. Tienes que imprimir su propiedad Name.

Código: [Descargar] [Ocultar] [Seleccionar]

Print Str(cls1[strSymbol].Name)

Saludos

===================
No podemos regresar

#4 Jueves, 09 Junio 2016, 08:31

Temas parecidos

	Autor	Foro	Respuestas	último mensaje
Gambas: Clases Y Objetos	soplo	General	4	Jueves, 08 Octobre 2009, 13:22 soplo
Soltar Del Explorador Caja (Mate) A Nuestr...	Shell	General	3	Sabado, 22 Junio 2013, 12:19 Shell
Explorador De Proyectos De Gambas. Creando...	Shell	Instalación	5	Martes, 02 Septiembre 2014, 08:42 Shell
Explorador De Archivos No Muestra Icono De...	Shell	Mundo Linux	0	Miercoles, 30 Enero 2019, 10:33 Shell

Página 1 de 1

Fecha y hora actual: Domingo, 28 Abril 2024, 03:08 • Todas las horas son UTC + 1 Hora

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

Versión reducida del foro - (Lo-Fi)
Página generada en:: 2.5706s (PHP: -97% SQL: 197%)
Consultas SQL: 47 - Debug off - GZIP Activado

Design by Mighty Gorgon