Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Funcion Que Devuelve El Tipo De Variable Como Palabra
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Funcion Que Devuelve El Tipo De Variable Como Palabra 
 
Hola, hice esta función para obtener las variables en forma textual ya que no encontré la forma de hacerlo con funcionas nativas de gambas.
Probe con TypeOf, pero no va.
Si alguien sabe una forma nativa, por favor coméntelo.

Public Function TypeVar(intType As Integer) As String
  '' Función que devuelve el tipo de variable como una palabra.
  '' Como parametro de entrada requiere un numero entero.

  Dim strType As String

  Select intType
    Case 0
      strType = "NULL"
    Case 1
      strType = "Boolean"
    Case 2
      strType = "Byte"
    Case 3
      strType = "Short"
    Case 4
      strType = "Integer"
    Case 5
      strType = "Long"
    Case 6
      strType = "Single"
    Case 7
      strType = "Float"
    Case 8
      strType = "Date"
    Case 9
      strType = "String"
    Case 10
      strType = "Variant"
    Case 11
      strType = "Object"
    Case 12
      strType = "Pointer"
    Case 13
      strType = "Function"
    Case 14
      strType = "Class"

  End Select

  Return strType

End
 


Espero que sea de utilidad

Saludos.
 



 
tincho - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Funcion Que Devuelve El Tipo De Variable Como Palabra 
 
...recuerdo que existe un asunto parecido:

https://www.gambas-es.org/viewtopic.php?f=1&t=5133
 



 
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Funcion Que Devuelve El Tipo De Variable Como Palabra 
 
...uhmmm....otra manera podría ser usando vector de tipo String[ ]:

Public Sub Main()

  Dim b As Byte
  Dim tipos As String[]
    
' Enumeración tipos variables según "gambas datatypes identifiers" en el archivo fuente ".../main/share/gb_type_common.h":
    tipos = ["Void", "Boolean", "Byte", "Short", "Integer", "Long", "Single", "Float"
             "Date", "String", "CString", "Pointer", "Variant", "Function", "Class", "Null", "Object"]
          
    b = 13

    Print tipos[b - 1]

End




...y si actualizáis gambas via SVN, podéis interrogar directamente el archivo fuente ".../main/share/gb_type_common.h" en la carpeta "trunk":
Public Sub Main()

  Dim s As String
  Dim ss As String[]
  Dim b, j As Byte

   b = 13
  
    If Exist(User.Home &/ "trunk") Then
      s = File.Load(User.Home &/ "trunk/main/share/gb_type_common.h")
      s = Scan(s, "*else\n\nenum \\{\n*,\n  TC_ARRAY*")[1]
      ss = Split(s, "\n")
      For j = 0 To ss.Max
        ss[j] = Trim(Mid(ss[j], 5, 8))
      Next
      Print ss[b]
    Endif

End

 



 
última edición por vuott el Viernes, 03 Junio 2016, 18:01; editado 4 veces 
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Funcion Que Devuelve El Tipo De Variable Como Palabra 
 
vuott escribió: [Ver mensaje]
...uhmmm....otra manera podría ser usando vector de tipo String[ ]:

Me pareció mas practica la primera opción, ya que funciona en todo tipo de "instalaciones", el que es via cvn como no creo que se creen nuevos tipos de variables me parece menos practico.

Saludos.
 



 
tincho - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Como Se Declara Una Variable De Tipo Color? v3ctor General 2 Domingo, 01 Diciembre 2013, 21:03 Ver último mensaje
v3ctor
No hay nuevos mensajes Averiguar Tipo De Variable Ricardo Prieto General 12 Viernes, 25 Marzo 2016, 18:41 Ver último mensaje
fedefunes
No hay nuevos mensajes Variable Variant, Como Saber De Que Tipo Es tincho Aplicaciones/Fragmentos de Código 4 Lunes, 05 Noviembre 2018, 13:48 Ver último mensaje
tincho
No hay nuevos mensajes Funcion Que Devuelve Información De Un Ar... tincho Aplicaciones/Fragmentos de Código 2 Domingo, 22 Diciembre 2019, 20:58 Ver último mensaje
vuott
 

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

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 0 invitados
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
No puede descargar archivos
No puede publicar eventos en el calendario