<![CDATA[Comunidad Gambas-es - Aplicaciones/Fragmentos de Código]]>

<![CDATA[Comunidad Gambas-es - Aplicaciones/Fragmentos de Código]]> https://gambas-es.org/ Tue, 14 Apr 2026 04:34:19 +0000 MyBB <![CDATA[FACTURA POR REPORT GAMBAS3]]> https://gambas-es.org/thread-1994.html Mon, 27 Oct 2025 13:03:24 +0000 Alberto59]]> https://gambas-es.org/thread-1994.html

factura 16.pdf (Tamaño: 422.04 KB Descargas: 10)

Hola Shell

MIra hace tiempo que no estoy conectado y bueno ya estoy aqui.

Te digo,ya sé como usar el dichoso report para hacer una dichosa factura,desde el mismo formulario.
Te mando una copia de la factura hecha con reporte y si lo crees conveniente te mando el programa.

Para aquellos que lo necesiten.ok

Nota:

Tengo hecho en dos formatos uno en HTML ,como sabes y el otro en REPORTE de gambas3]]> <![CDATA[Ejecutar un archivo de audio o Midi al hacer clic en MapView]]> https://gambas-es.org/thread-1985.html Thu, 25 Sep 2025 05:36:21 +0000 vuott]]> https://gambas-es.org/thread-1985.html Se necesita activar los Componentes "gb.map" y "gb.media" de Gambas.

https://www.gambas-it.org/wiki/index.php...la_MapView]]> Se necesita activar los Componentes "gb.map" y "gb.media" de Gambas.

https://www.gambas-it.org/wiki/index.php...la_MapView]]> <![CDATA[Leer en el área de memoria ocupada por un Objeto]]> https://gambas-es.org/thread-1984.html Mon, 22 Sep 2025 11:56:38 +0000 vuott]]> https://gambas-es.org/thread-1984.html
https://www.gambas-it.org/wiki/index.php...un_oggetto]]>
https://www.gambas-it.org/wiki/index.php...un_oggetto]]> <![CDATA[Mostrar una imagen con Drag&Drop de su archivo en un PictureBox o en un ImageView]]> https://gambas-es.org/thread-1982.html Tue, 16 Sep 2025 23:28:20 +0000 vuott]]> https://gambas-es.org/thread-1982.html
https://www.gambas-it.org/wiki/index.php..._ImageView]]>
https://www.gambas-it.org/wiki/index.php..._ImageView]]> <![CDATA[Convertir formatos de audio mediante el Componente gb.media]]> https://gambas-es.org/thread-1981.html Sat, 13 Sep 2025 22:36:01 +0000 vuott]]> https://gambas-es.org/thread-1981.html
https://www.gambas-it.org/wiki/index.php...e_gb.media]]>
https://www.gambas-it.org/wiki/index.php...e_gb.media]]> <![CDATA[Paren...WAIT !!!]]> https://gambas-es.org/thread-1980.html Fri, 22 Aug 2025 11:58:43 +0000 tercoide]]> https://gambas-es.org/thread-1980.html

Código:
WAIT       'revisa el bucle de eventos, pero NO del teclado y mouse, y regresa inmediatamente

WAIT 0    ' idem pero lee eventos del teclado y mouse

WAIT 0.1 ' idem pero regresa a los 0.1 segundos

]]>

Código:
WAIT       'revisa el bucle de eventos, pero NO del teclado y mouse, y regresa inmediatamente

WAIT 0    ' idem pero lee eventos del teclado y mouse

WAIT 0.1 ' idem pero regresa a los 0.1 segundos

]]> <![CDATA[Fases lunares]]> https://gambas-es.org/thread-1975.html Fri, 25 Jul 2025 21:34:09 +0000 vuott]]> https://gambas-es.org/thread-1975.html No recuerdo quién lo escribió. En las fuentes del programa solo estaba presente la probable referencia a tal "aztk".
Cuando volví a probar el código, había problemas de funcionamiento debido a las modificaciones introducidas en los gráficos de Gambas.
He actualizado el código y ahora está funcionando de nuevo.
Se lo devuelvo a esta comunidad de programadores.

faseslunares-0.0.3.tar.gz (Tamaño: 13.97 KB Descargas: 2)

]]> No recuerdo quién lo escribió. En las fuentes del programa solo estaba presente la probable referencia a tal "aztk".
Cuando volví a probar el código, había problemas de funcionamiento debido a las modificaciones introducidas en los gráficos de Gambas.
He actualizado el código y ahora está funcionando de nuevo.
Se lo devuelvo a esta comunidad de programadores.

faseslunares-0.0.3.tar.gz (Tamaño: 13.97 KB Descargas: 2)

]]> <![CDATA[Ejemplo de chat]]> https://gambas-es.org/thread-1942.html Mon, 21 Apr 2025 19:35:15 +0000 alberto-moyano]]> https://gambas-es.org/thread-1942.html
Analizo la posibilidad de llevarlo a cabo, pero antes de ponerme a estudiar el tema quería saber si va a ser posible en Gambas.

Saludos]]>
Analizo la posibilidad de llevarlo a cabo, pero antes de ponerme a estudiar el tema quería saber si va a ser posible en Gambas.

Saludos]]> <![CDATA[Instalar aplicación en máquinas de clientes (alumnos)]]> https://gambas-es.org/thread-1935.html Fri, 18 Apr 2025 03:05:26 +0000 alberto-moyano]]> https://gambas-es.org/thread-1935.html
Estoy dando un curso de edición ramificada basada en lenguaje de marcas con LaTeX en la UBA y los alumnos (39) tienen que instalar diferentes aplicaciones, esto incluye mi desarrollo en gambas, se instalaron sin problemas todas menos mi desarrollo, lo que fue un fiasco, se supone que al instalarse las aplicaciones, el instalador «lee» todos los componentes necesarios y los instala, pero por algún motivo solo instala algunos (el runtime y algunos más), desconozco que hace para decidir que instala y que no, la cuestión es que encontré una salida, que no es común, pero funciona 100% efectiva.

Hice un script (se corre con sudo su) en bash que lee que distro esta corriendo e instala todos los componentes que están listados, luego se puede instalar la app de gambas con 0 error, les comparto el script

Código:
#!/bin/bash

# Lista de componentes que necesita el programa

COMPONENTES=(

    gambas3-runtime

    gambas3-gb-db

    gambas3-gb-db-sqlite3

    gambas3-gb-dbus

    gambas3-gb-desktop

    gambas3-gb-form

    gambas3-gb-form-dialog

    gambas3-gb-form-terminal

    gambas3-gb-image

    gambas3-gb-inotify

    gambas3-gb-net

   gambas3-gb-net-curl

   gambas3-gb-qt5

   gambas3-gb-qt5-ext

   gambas3-gb-qt5-webview

   gambas3-gb-settings

   gambas3-gb-term

   gambas3-gb-util

   gambas3-gb-util-web

)

echo "Detectando distribución..."

# Detectar distribución

if [ -f /etc/os-release ]; then

    . /etc/os-release

    DISTRO=$ID

else

    echo "No se pudo detectar la distribución. Instalación cancelada."

    exit 1

fi

# Función para instalar componentes si no están instalados

instalar_si_faltan() {

    local comando_check=$1

    local comando_instalar=$2

    for comp in "${COMPONENTES[@]}"; do

        if ! eval "$comando_check $comp" &>/dev/null; then

            echo "Instalando $comp..."

            eval "$comando_instalar $comp"

        else

            echo "$comp ya está instalado. Omitiendo."

        fi

    done

}

# Instalar según distribución

case "$DISTRO" in

    ubuntu|debian|linuxmint)

        echo "Distribución Debian/Ubuntu/Mint detectada."

        apt update

        instalar_si_faltan "dpkg -s" "sudo apt install -y"

        ;;

    opensuse*|suse)

        echo "Distribución openSUSE detectada."

        instalar_si_faltan "rpm -q" "sudo zypper install -y"

        ;;

    fedora)

        echo "Distribución Fedora detectada."

        instalar_si_faltan "rpm -q" "sudo dnf install -y"

        ;;

    arch|manjaro)

        echo "Distribución Arch/Manjaro detectada."

        instalar_si_faltan "pacman -Q" "sudo pacman -S --noconfirm"

        ;;

    *)

        echo "Distribución $DISTRO no soportada automáticamente."

        echo "Por favor instala manualmente los siguientes componentes:"

        printf '%s\n' "${COMPONENTES[@]}"

        exit 1

        ;;

esac

echo "Todos los componentes de Gambas han sido verificados e instalados según necesidad."

]]>
Estoy dando un curso de edición ramificada basada en lenguaje de marcas con LaTeX en la UBA y los alumnos (39) tienen que instalar diferentes aplicaciones, esto incluye mi desarrollo en gambas, se instalaron sin problemas todas menos mi desarrollo, lo que fue un fiasco, se supone que al instalarse las aplicaciones, el instalador «lee» todos los componentes necesarios y los instala, pero por algún motivo solo instala algunos (el runtime y algunos más), desconozco que hace para decidir que instala y que no, la cuestión es que encontré una salida, que no es común, pero funciona 100% efectiva.

Hice un script (se corre con sudo su) en bash que lee que distro esta corriendo e instala todos los componentes que están listados, luego se puede instalar la app de gambas con 0 error, les comparto el script

Código:
#!/bin/bash

# Lista de componentes que necesita el programa

COMPONENTES=(

    gambas3-runtime

    gambas3-gb-db

    gambas3-gb-db-sqlite3

    gambas3-gb-dbus

    gambas3-gb-desktop

    gambas3-gb-form

    gambas3-gb-form-dialog

    gambas3-gb-form-terminal

    gambas3-gb-image

    gambas3-gb-inotify

    gambas3-gb-net

   gambas3-gb-net-curl

   gambas3-gb-qt5

   gambas3-gb-qt5-ext

   gambas3-gb-qt5-webview

   gambas3-gb-settings

   gambas3-gb-term

   gambas3-gb-util

   gambas3-gb-util-web

)

echo "Detectando distribución..."

# Detectar distribución

if [ -f /etc/os-release ]; then

    . /etc/os-release

    DISTRO=$ID

else

    echo "No se pudo detectar la distribución. Instalación cancelada."

    exit 1

fi

# Función para instalar componentes si no están instalados

instalar_si_faltan() {

    local comando_check=$1

    local comando_instalar=$2

    for comp in "${COMPONENTES[@]}"; do

        if ! eval "$comando_check $comp" &>/dev/null; then

            echo "Instalando $comp..."

            eval "$comando_instalar $comp"

        else

            echo "$comp ya está instalado. Omitiendo."

        fi

    done

}

# Instalar según distribución

case "$DISTRO" in

    ubuntu|debian|linuxmint)

        echo "Distribución Debian/Ubuntu/Mint detectada."

        apt update

        instalar_si_faltan "dpkg -s" "sudo apt install -y"

        ;;

    opensuse*|suse)

        echo "Distribución openSUSE detectada."

        instalar_si_faltan "rpm -q" "sudo zypper install -y"

        ;;

    fedora)

        echo "Distribución Fedora detectada."

        instalar_si_faltan "rpm -q" "sudo dnf install -y"

        ;;

    arch|manjaro)

        echo "Distribución Arch/Manjaro detectada."

        instalar_si_faltan "pacman -Q" "sudo pacman -S --noconfirm"

        ;;

    *)

        echo "Distribución $DISTRO no soportada automáticamente."

        echo "Por favor instala manualmente los siguientes componentes:"

        printf '%s\n' "${COMPONENTES[@]}"

        exit 1

        ;;

esac

echo "Todos los componentes de Gambas han sido verificados e instalados según necesidad."

]]> <![CDATA[Mostrar Tablas y sus registros]]> https://gambas-es.org/thread-1894.html Sun, 16 Mar 2025 12:01:31 +0000 Shell]]> https://gambas-es.org/thread-1894.html
Quizás deba mejor mostrar esto en el foro de bases de datos. Huh

He creado un ejemplo para mostrar las tablas de una base de datos y sus registros.
Se puede seleccionar el archivo en concreto y ver en un GridView como es la tabla en cuestión.

He probado con distintos archivos de distintos tamaños.

¿ Qué hacéis cuando la base de datos es enorme ?.

En este ejemplo observo dos cosas. Imaginar una base de datos que contiene muchos registros.
A la hora de seleccionar en el combobox la tabla en concreto,si esta tiene muchos registros hay una demora,
en mostrar el nombre de la tabla tanto en el combobox como en el gridview.

El efecto es, ves la lista de tablas en el combobox, seleccionas y hasta que no se muestra la tabla en el gridview
no se muestra el nuevo cambio de item en el combobox.

He probado con un base de 40K registros y se nota. Siempre se nota esto si la base contiene muchos registros.
He probado con la base de los libros que se ha compartido por febrero. Esta tiene tres tablas, hay una que
se llama "fondo" que en este ejemplo le cuesta muuuuucho mostrar, se muestra el reloj varias veces y desistí.

¿ Cómo solucionáis esas situaciones ?

Estamos hablando de que la tabla fondos de la base libro tiene alrededor de 300K registros... Rolleyes

Ah, no he añadido ordenar las columnas. Estoy usando el evento Data para mostrar los registros en el gridview.
Sobre todo si son muchos.

Para el retardo del cambio de item a mostrar en el combobox he usado esto:

Código:
Public Sub cmbTablas_Click()

  Wait 0.1

  MostrarTablaEnGridView(cmbTablas.Current.Text)

End

Eso parece funcionar, otra es muy distinta el tiempo que se tarde en mostrar los registros en el GridView

Saludos

1:50'' para mostrar la tabla Fondos.

EjemploBrowserBaseSqlite-0.0.1.tar.gz (Tamaño: 10.56 KB Descargas: 2)

]]>
Quizás deba mejor mostrar esto en el foro de bases de datos. Huh

He creado un ejemplo para mostrar las tablas de una base de datos y sus registros.
Se puede seleccionar el archivo en concreto y ver en un GridView como es la tabla en cuestión.

Ah, no he añadido ordenar las columnas. Estoy usando el evento Data para mostrar los registros en el gridview.
Sobre todo si son muchos.

Para el retardo del cambio de item a mostrar en el combobox he usado esto:

Código:
Public Sub cmbTablas_Click()

  Wait 0.1

  MostrarTablaEnGridView(cmbTablas.Current.Text)

End

Eso parece funcionar, otra es muy distinta el tiempo que se tarde en mostrar los registros en el GridView

Saludos

1:50'' para mostrar la tabla Fondos.

EjemploBrowserBaseSqlite-0.0.1.tar.gz (Tamaño: 10.56 KB Descargas: 2)

]]> <![CDATA[Un editor de Risa para editar RichText]]> https://gambas-es.org/thread-1880.html Mon, 03 Mar 2025 17:16:25 +0000 Shordi]]> https://gambas-es.org/thread-1880.html Lo he llamado Risa (Richtext Intuitivo Sencillo y Asequible)

Este es el enlace donde lo presento. En la descripción del vídeo tenéis el enlace al código.

]]> Lo he llamado Risa (Richtext Intuitivo Sencillo y Asequible)

Este es el enlace donde lo presento. En la descripción del vídeo tenéis el enlace al código.

]]> <![CDATA[Gambas + ERP = GamERP.]]> https://gambas-es.org/thread-1856.html Mon, 10 Feb 2025 19:47:50 +0000 tincho]]> https://gambas-es.org/thread-1856.html
Nuevamente voy a intentar hacer algo con gambas webforms, también con sockets, para evitar los bloqueos de la base de datos, pero también para separar los proyectos y poder colaborar con mas programadores.
Comunicar dos o mas programas cliente con uno servidor que sera el que gestione la lógica con la base de datos.
Los clientes pueden ser GUI, Web, terminal?.
Ya tengo una base de datos mas o menos decente y funcionando en SQLite.
Si alguien esta interesado en participar de un proyecto, que estará desde el comienzo dividido en partes, es bienvenido.
Me gustaría poder disponer de un ERP hecho en gambas y un cliente web también hecho en Gambas, en su momento Jesús se mostró interesado en hacer el cliente con Flutter, pero yo no seguí con el tema por falta de tiempo y tengo el curso de Flutter a medias.
Hara falta:

Hacer un ejemplo funcional de comunicaciones con socket que se pueda pasar luego al "GAMERP" y ya esta me salio un nombre sobre la marcha.
Crear una formulario web (en gambas o en otra tecnología) para Login, Registrarse, enviar datos de contacto, etc.
Mas cosas seguramente.

Saludos.]]>
Nuevamente voy a intentar hacer algo con gambas webforms, también con sockets, para evitar los bloqueos de la base de datos, pero también para separar los proyectos y poder colaborar con mas programadores.
Comunicar dos o mas programas cliente con uno servidor que sera el que gestione la lógica con la base de datos.
Los clientes pueden ser GUI, Web, terminal?.
Ya tengo una base de datos mas o menos decente y funcionando en SQLite.
Si alguien esta interesado en participar de un proyecto, que estará desde el comienzo dividido en partes, es bienvenido.
Me gustaría poder disponer de un ERP hecho en gambas y un cliente web también hecho en Gambas, en su momento Jesús se mostró interesado en hacer el cliente con Flutter, pero yo no seguí con el tema por falta de tiempo y tengo el curso de Flutter a medias.
Hara falta:

Hacer un ejemplo funcional de comunicaciones con socket que se pueda pasar luego al "GAMERP" y ya esta me salio un nombre sobre la marcha.
Crear una formulario web (en gambas o en otra tecnología) para Login, Registrarse, enviar datos de contacto, etc.
Mas cosas seguramente.

Saludos.]]> <![CDATA[SQLite - Programa en Gambas par crear y manipular, automáticamente.]]> https://gambas-es.org/thread-1851.html Mon, 03 Feb 2025 19:19:16 +0000 seta43]]> https://gambas-es.org/thread-1851.html Se me vino la idea de crear un programa generador de una base de datos y a la vez el programa gráfico en gambas para interactuar con la base de datos.

http://seta43.duckdns.org/makedb/makedb.html

]]> Se me vino la idea de crear un programa generador de una base de datos y a la vez el programa gráfico en gambas para interactuar con la base de datos.

http://seta43.duckdns.org/makedb/makedb.html

]]> <![CDATA[Obtener los eventos de controles creados en otra parte pero colocados en el formular.]]> https://gambas-es.org/thread-1832.html Fri, 03 Jan 2025 10:48:31 +0000 tincho]]> https://gambas-es.org/thread-1832.html
Cuando los controles se crean en un módulo, no en el formulario principal, pero luego estos son colocados en un panel en el formulario principal ¿Cuál es la forma de obtener los eventos en estos controles en el formulario?

Gracias.

sample-controls-by-code-0.0.1.tar.gz (Tamaño: 7.86 KB Descargas: 1)

]]>
Cuando los controles se crean en un módulo, no en el formulario principal, pero luego estos son colocados en un panel en el formulario principal ¿Cuál es la forma de obtener los eventos en estos controles en el formulario?

Gracias.

sample-controls-by-code-0.0.1.tar.gz (Tamaño: 7.86 KB Descargas: 1)

]]> <![CDATA[Editor de Temas y colores]]> https://gambas-es.org/thread-1803.html Thu, 03 Oct 2024 18:44:26 +0000 Harpo]]> https://gambas-es.org/thread-1803.html
Les traigo una pequeña aplicación que he desarrollado para editar temas de Gambas, por si a alguien le es de utilidad. Estaba con un editor de ficheros SVG y el editor de Gambas no tiene definido ese formato, lo más parecido es HTML. Y en Gnome en modo oscuro se visualiza muy mal. Así que me puse a investigar como cambiarlo.

Para quien el interese, el editor de Gambas (gb.form.editor) tiene dos propiedades:

Mode: cómo identifica el código.
Highlight: como formatea el código, colores, tipo de letra.

En ambos casos hay una lista predefinida: Gambas - HTML - CCS - SQL - ....

Todo lo relativo al formateo de código está en el componente gb.Highlight. Dentro tenemos 3 clases:

TextHighlighter: la clase padre de todos los formateadores de código, es estática. Y contiene las palabras claves (States) y su formato.

Por ejemplo el siguiente código lista todos los estados de todos los TextHighlighters:

Código:
   Dim sHighLighter, sState As String

   For Each sHighLighter In TextHighlighter.List

      For Each sState In TextHighlighter[sHighLighter].States

         Debug sHighLighter & "." & sState

      Next

   Next

' Salida HTML

' html.Attribute

' html.Comment

' html.Doctype

' html.Entity

' html.Markup

' html.Normal

' html.Value

TextHighlighterStyle: Es la clase que define el estilo usado para pintar los States,
TextHighlighterTheme: Unifica los anteriores, un tema básicamente es un conjunto de estilos:

Código:
[Gambas Highlighting Theme 1.0]

Attribute="#FFFFFF,Bold"

Comment="#33D17A"

Doctype="#929291,Bold"

Entity="#E67E22,Bold"

Markup="#99C1F1,Bold"

Normal="#FFFFFF"

Value="#F5C211"

Background="#494949"

Y aclarado lo anterior, la aplicación. Es un 3 en 1.

Editor de Temas, tiene dos áreas:

En la parte superior
- Un ComboBox para seleccionar el Highlighter y un CheckBox para incluir todos los estados definidos, no solo los del Highlighter seleccionado.
- Un ColumnView con los estilos de base, en negrita y subrayado los estilos propios del Highlighter seleccionado.
- Un segundo ColumnView con los estilos que queremos en el nuevo tema.
- Una columna de botones para mover estilos entre los dos ColumnView
- Unos controles a la derecha para cambiar los estilos del nuevo tema: color y tipos de letra.
- 3 botones: para probar el nuevo tema en el editor de abajo, para guardar el tema y para cargar un fichero con la definición de un tema.
En la parte inferior un editor y un FileBox para cargar ficheros en el editor.

Colores, básicamente es un selector de colores y dos utilidades: Color Merge y SetAlpha. El código de Gambas usa esas dos funciones muy habitualmente y siempre estaba probando números. Una observación, el selector de colores de este formulario se actualiza cuando seleccionamos un elemento en cualquiera de los dos ColumnView del formulario anterior. Para ello usa una clase Dictionary, un Collection con eventos y algunas cosas más.

[Imagen: APfPYCC.png]

Palette. Un generador de paletas de colores usando Color.HSV. Se selecciona el valor del Spinbox de arriba a la izquierda y pulsando el botón de debajo genera la paleta en un GridView. Abajo a la derecha es lo mismo pero pudiendo modificar tres parametros: HUE - Saturación - Valor.
[Imagen: HQ6UV0s.png]

Clase Dictionary. En ocasiones hecho de menos poder añadir información a una clase Collection, además de el par Key-Value y de ahí que haya desarrollado esta clase.
Deriva de Collection pero no usa herencia, reimplementa la clase. En vez de usar un Variant para Value usa una clase _Dictionary_Item, un Variant[2].
Las diferencias son las siguientes:

Código:
   Dim hCol As Collection

   Dim hDict As Dictionary

   Dim hItem As _Dictionary_Item

   Dim sKey As String

   Dim vValue, vAttrib As Variant

   ''Asignar valor: _put

   hCol[sKey] = vValue      'Collection

   hCol.Add(vValue, sKey)

   hDict[sKey] = vValue         'Dictionary

   hDict[sKey].Attrib = vAttrib

   hDict.Add(vValue, sKey, vAttrib)

   'Esto no funciona!!

   With hDict[sKey]

      .Value = vValue

      .Attrib = vAttrib

   End With

   ''Leer valor: _get

   vValue = hCol[sKey]        'Collection

   hItem = hDict[sKey]    'Dictionary devuelve un objeto _Dictionary_Item

   vValue = hDict[sKey].Value

   vAttrib = hDict[sKey].Attrib

'

   With hDict[sKey]

      vValue = .Value

      vAttrib = .Attrib

   End With

   ''Bucle lectura

   For Each vValue In hCol

      '.....

   Next    

   For Each hCol

      '.....

   Next

   For Each hItem In hDict

      '.....

   Next

   For Each hDict

      '.....

   Next

   For Each sKey In hDict.Keys

      '.....

   Next

Y el proyecto con el programa. Espero que les sea de utilidad.
Un saludo, Harpo.

Una última observación sobre la clase Dictionary, tiene dos eventos:

Event Change(Key As String, Modify As Boolean)
Event Remove(Key As String)

Y funciona como cualquier evento:

Código:
cThemeColors = New Dictionary As "ThemeColors"

Public Sub ThemeColors_Change(Key As String, Modify As Boolean)      ''Dictionary event

   ' Se dispara al añadir un elemento al Dictionary o modificarlo.

End

Y una última observación, la clase Dictionary también emula a una JSONCollection, admite nulos. Por otro lado importa y exporta JSON:

Public Sub FromString(JSONString As String) ''Load Dictionary from JSON string
Public Sub JSONLoad(JSONFile As String) ''Load Dictionary from JSON file
Public Function ToString(Optional Indent As Boolean) As String ''Export Dictionary to JSON string,
Public Function JSONSave(JSONFile As String, Optional Indent As Boolean) As Boolean ''Save Dictionary to JSON file.

El Indent de las funciones no tiene relevancia, siempre indenta las cadenas o ficheros.

Y agradecimientos, parte importante del código no es mio. La función para formatear JSON es autoria de Tincho sino recuerdo mal. Las funciones para convertir colores de Shordi. Gracias a los maestros.

Colors-1.0.6.tar.gz (Tamaño: 39.56 KB Descargas: 3)

]]>
Les traigo una pequeña aplicación que he desarrollado para editar temas de Gambas, por si a alguien le es de utilidad. Estaba con un editor de ficheros SVG y el editor de Gambas no tiene definido ese formato, lo más parecido es HTML. Y en Gnome en modo oscuro se visualiza muy mal. Así que me puse a investigar como cambiarlo.

Para quien el interese, el editor de Gambas (gb.form.editor) tiene dos propiedades:

Mode: cómo identifica el código.
Highlight: como formatea el código, colores, tipo de letra.