Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Novedades Gambas3
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Novedades Gambas3 
 
Hola a tod@s:

Seria interesante tener un post, dedicado a todas las novedades que trae gambas3.

Yo expongo las que me he encontrado (o lo había leído en otros post del foro)

- Identación Automática del código: Menú Herramientas/Preferencias/Formateo de Código
Hace mas legible el código fuente (lo va tabulando)
preferenciash

- Conexiones a bases de datos:
Tenemos que tener activado por lo menos el control gb.db, y nos aparecerá un nuevo "directorio" al lado izquierdo, "Conexiones", donde haciendo click, podemos crear las conexiones o refrescarlas.
conexionesaba

-Organizar nuestro proyecto:

Tambien en el lado izq, donde vemos la organización del proyecto, podemos crear directorios,para organizar, los módulos, clases, formularios, y otros archivos, de una manera mucho mas clara (sobre todo si el programa es extenso)
organizarproy

-Crear array de clases no nativas.
Ahora se pueden hacer arrays de clases no nativas (osea, se pueden hacer arrays  clases que hemos creado nosotros)
ejemplo:
Definimos la clase "ver"
Public dato As String
Public Function escribe() As String
    Print dato
    Return dato
End


Y el codigo principal

Public Sub Form_Open()
    Dim mi As New Ver[]
    Dim a As New Ver
    Dim i As Integer
    a.dato = "10"
    mi.Add(a)
  
    a = New Ver 'reiniciamos la clase auxiliar
    a.dato = "39"
    mi.Add(a)

   Print mi[0].dato
   Print mi[1].dato

   mi[0].escribe
   mi[1].escribe

End


Seguramente, habrá cientos de cosas más..., os animo a ir añadiendolas    
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
última edición por jsbsan el Martes, 03 Enero 2012, 01:31; editado 1 vez 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Novedades Gambas3 
 
Que emoción con lo que dices de los array de las clases no nativas... No se si habrá alguna diferencia con Object[]?

Es uno de los tipos de array que tengo que usar muy frecuentemente, qué bueno que hayan implementado eso!

saludos!
 



 
santijav - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Novedades Gambas3 
 
Por cierto, esto que has escrito acerca de los array de clases no nativas, ya está funcionando así desde hace bastante en gambas2 con la clase object.

Has puesto:

Public Sub Form_Open()
    Dim mi As New Ver[]
    Dim a As New Ver
    Dim i As Integer
    a.dato = "10"
    mi.Add(a)
  
    a = New Ver 'reiniciamos la clase auxiliar
    a.dato = "39"
    mi.Add(a)

   Print mi[0].dato
   Print mi[1].dato

   mi[0].escribe
   mi[1].escribe

End


Y esto a mi en unos programas también me funciona en cosas hechas en gambas2 y gambas3 con arreglos tipo object[]:

Public array_estrategias As New Object[]
Public Sub calcula_valores()
  
  Dim i As Integer = 0
  
  Do While i < array_estrategias.Count 'para cada estrategia
    
  array_estrategias[i].valua()

  i = i + 1
  Loop
End


Es más, en otra ocasión, un object[] contenía objetos que a su vez tenían dentro otro arreglo tipo object[] y podía hacer algo así como:

object1[i].object2[ii].método_que_fuere


y funcionaba perfectamente!

A explorar las nuevas funcionalidades!!
 



 
santijav - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Novedades Gambas3 
 
hola buenos días, yo empeze a trabajar con gambas 3 con un proyecto ya realizado en gambas RC6 me mostraba la información que contenía mi base de datos pero era muy lento para imprimir, por eso decidí trabajarlo en la nueva versión pero esta no me muestra la información en los ReportVBox le muestro el código puede ser que me falta algo podrían ayudarme

Public Sub _new()
  
   Dim hResult As Result
  Dim Rlbl1 As ReportLabel
  Dim Rlbl2 As ReportLabel
  Dim Rlbl3 As ReportLabel
  Dim Rlbl4 As ReportLabel
  Dim Rlbl5 As ReportLabel
  Dim Rlbl6 As ReportLabel
  Dim Rlbl7 As ReportLabel
  Dim Rlbl8 As ReportLabel
  Dim Rlbl9 As ReportLabel
  Dim Rlbl10 As ReportLabel
  Dim Rlbl11 As ReportLabel
  Dim Rlbl12 As ReportLabel
  Dim Rlbl13 As ReportLabel
  Dim Rlbl14 As ReportLabel
  Dim Rlbl15 As ReportLabel
  Dim Rlbl16 As ReportLabel
  Dim Rlbl17 As ReportLabel
  Dim Rlbl18 As ReportLabel
  Dim Rlbl19 As ReportLabel
  Dim Rlbl20 As ReportLabel
  Dim Rlbl21 As ReportLabel
  Dim Rlbl22 As ReportLabel
  Dim Rlbl23 As ReportLabel
  Dim Rlbl24 As ReportLabel
  Dim Rlbl25 As ReportLabel
  Dim Rlbl26 As ReportLabel
  Dim Clave As String
  Dim Filtro As String
  
  Dim hConn As Connection
  
  
  hConn = New Connection
  
hConn.Host = "/home/marlin/Escritorio/prueba1/IMVI-BD"
  hConn.Name = "BD_OrdenPago"
  hConn.Type = "sqlite"
  Try hConn.Open()

  If Error Then
  
  Message.Error("ALGO A PASADO EN LA BASE DE DATOS")
  hConn = Null
  
  Else
    Filtro = OrdenesdePagos.DataControl4.Value

    hResult = hConn.Exec("Select * From RetencionISLR where Numero_Orden like'" & Filtro & "'")

End If

   If Not hResult.Available The Return
  For Each hResult
  

    Rlbl1 = New ReportLabel(ReportVBox2)
    Rlbl4 = New ReportLabel(ReportVBox4)
    Rlbl5 = New ReportLabel(ReportVBox5)
    Rlbl6 = New ReportLabel(ReportVBox6)
    Rlbl7 = New ReportLabel(ReportVBox7)
    Rlbl8 = New ReportLabel(ReportVBox8)
    Rlbl9 = New ReportLabel(ReportVBox9)
    Rlbl10 = New ReportLabel(ReportVBox10)
    Rlbl11 = New ReportLabel(ReportVBox11)
    Rlbl12 = New ReportLabel(ReportVBox12)
    Rlbl13 = New ReportLabel(ReportVBox14)
    Rlbl14 = New ReportLabel(ReportVBox15)
    Rlbl15 = New ReportLabel(ReportVBox16)
    Rlbl16 = New ReportLabel(ReportHBox6)
    Rlbl17 = New ReportLabel(ReportVBox15)
    Rlbl18 = New ReportLabel(ReportHBox2)
    Rlbl19 = New ReportLabel(ReportVBox15)
    Rlbl20 = New ReportLabel(ReportVBox15)
    Rlbl21 = New ReportLabel(ReportVBox17)
    Rlbl22 = New ReportLabel(ReportVBox13)
    Rlbl23 = New ReportLabel(ReportVBox16)
    Rlbl24 = New ReportLabel(ReportVBox16)
    Rlbl25 = New ReportLabel(ReportVBox16)
'     Rlbl1.Text = Date
'    
        Rlbl2 = ReportLabel6
       Rlbl26 = ReportLabel36
      
    Rlbl2.Text = hResult!RIF
    Rlbl4.Text = hResult!Factura
    Rlbl5.Text = hResult!Control
    Rlbl6.Text = hResult!Fecha
    Rlbl7.Text = hResult!MontoSujetoRet
    Rlbl8.Text = hResult!Concepto
    Rlbl9.Text = hResult!Sustraendo
    Rlbl10.Text = hResult!Porcentaje_Ret
    Rlbl11.Text = hResult!Monto_Ret
    Rlbl26.Text = hResult!FechaRet
Next
 



 
marlin - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Novedades Gambas3 
 
a otra cosa eso esta realizado en gb.report
 



 
marlin - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Crear BD En Gambas3: Administrador De Base... jsbsan Bases de Datos 6 Martes, 30 Agosto 2011, 17:00 Ver último mensaje
david
No hay nuevos mensajes Novedades En La Gambas 3.7 Shell General 4 Jueves, 19 Marzo 2015, 14:32 Ver último mensaje
Shell
No hay nuevos mensajes Nueva Versionde Gambas3: Gambas3.8 jsbsan General 8 Miercoles, 05 Agosto 2015, 15:40 Ver último mensaje
sebikul
No hay nuevos mensajes Gambas3 En Mac ahtonio Instalación 6 Martes, 11 Julio 2017, 15:49 Ver último mensaje
mckaygerhard
 

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