Comunidad Gambas-es

Cambios a la hora de escribir un código en Gambas

Shell 15-04-2021, 13:18

Buenas!.

En el tutorial de Gambas que estaba leyendo para repasar encontré sentencias o formas de escribir el código de otra manera.
Pueden cambiarte la forma de escribir ciertas instrucciones en Gambas.

Supongamos el for, que se me hace muy raro. Nosotros declaramos en una línea la variable y luego la usaríamos en el bucle.
Ahora que veo la forma me recuerda en parte a "Java".

Código:
Public Sub Ejemplo2()

  For a As Integer = 0 To 10

    Print "Paso " & a

  Next

End

¿ Qué pasa en esa línea ?.

Bien, pues que en el caso de que solo vayamos a usar la variable "a" una vez puede valernos.
Si esa misma variable la usáramos en otra parte del mismo procedimiento o función, no nos vale y debemos hacerlo
de la forma tradicional.

Otra es el no declarar las variables automáticamente.. jajaja..

Creo que he visto algo más, pero ahora no me acuerdo (la fuerza de la costumbre. Tongue

)

¿ Qué otras habéis visto vosotros y os acordaís ?.

Posiblemente conozcáis el pdf. Ah, pues mejor os muestro la wiki. Si ya quereís bajaros el pdf, seguro que lo encontráis.

Programming Gambas from Zip

Tiene cosas que a vece me choca, cada uno escribe el código como quiere. Las declaraciones de las variables me mata en ciertas partes del libro.
Opino que si quieres enseñar tienes que enseñar bien a hacer las cosas desde el principio. Hay que ir "modelando" una buena forma de hacer
las cosas. Pero no quiero quitarle meritos al que ha creado el tutorial. En los libros pasa igual. No hay nada perfecto. Bueno si...yo. Que era coña.. Big Grin

Dejé parado el libro cuando llegué al tema de ordenar un TableView o GridView. Si, la propiedad sort que no existe como tal.
Comencé a liarme a buscar códigos parecidos, de Vuott, de otros compañeros. Pero me parece que no acabé de solucionar el problema.
A ver si con tranquilidad os subo un ejemplo y hablamos de soluciones. A veces cuando leo y encuentro algo que no entiendo, no paro,
no encuentro solución y me frusto, me fusto mucho!.

Saludos y buen día.

General Sin respuestas

Extendiendo la clase File - BaseDir

tincho 15-04-2021, 11:45

Esta función devuelve el nombre del directorio inmediatamente superior de una ruta que se pasa y ademas quita todos los niveles superiores a este, trabaja similar a la función nativa BaseName pero con el directorio.

Código:
'' <b>RAD Extension.</b><br>

'' Returns the directory without the path to it, that is, it returns the name of the directory. if you pass "/home/user/music" it will return "music"

Static Public Function BaseDir(Path As String) As String

  Dim strBase As String

  Dim stx As New String[]

  If InStr(Path, "/") > 0 Then

    stx = Split(Path, "/")

    strBase = stx[stx.Max]

  Endif

  Return strBase

End

Saludos

Aplicaciones/Fragmentos de Código Sin respuestas

Extendiendo la clase String - Trim

tincho 15-04-2021, 11:13

Esta la hizo Christof, de la lista internacional de Gambas, y yo la adapte.
Fue la que obtuvo la marca de velocidad mas alta (con FAST).

Código:
'' <b>RAD Extension.</b><br>

'' It removes the spaces at the beginning and the end of

'' a <b>s</b> and if there are repeated spaces, it converts them into one.

Static Public Function Trim(s As String) As String

  Dim sOut As String

  sOut = Trim(RTrim(s))

  While InStr(sOut, "  ")

    sOut = Replace(sOut, "  ", " ")

  Wend

  Return sOut

End

Saludos.