tincho 30-04-2022, 20:52
Hola amigos.
Hace un tiempo vengo trabajando en este programa que les presento y comparto llamado GauchoSketch.
Por ahora, es solo el comienzo de su desarrollo, pero espero ir más allá.
Ya tenia bastante avanzada una interfase, que era destinada a GauchoCAD pero al quedar este discontinuado decidí crear un proyecto mas modesto, usando la clase Paint
Tercoide usa clases para dibujar en GambasCAD pero me resultaba difícil seguir el "rastro" de como usarlas así que tome como ejemplo para dibujar usando clases al programa RcadGB3 que, como probablemente sabrán, también está hecho en gambas y disponible en el foro francés.
Si alguien está interesado en realizar pruebas para informar errores o sugerir cambios, no dude en ponerse en contacto conmigo.
Finalmente no intento reinventar la rueda, solo hacer un programa lo mas sencillo posible para hacer dibujos de menos de 2000 entidades.
Los invito a echar un vistazo, el código está disponible en:
https://gitlab.com/belmotek/gauchosketch
[Imagen: Wacx7Xt.gif]
gambafeliz 21-04-2022, 16:12
Hola

Deseo usar las características de Key - Value de un Collection para simular un Registro de una tabla cualquiera, y digamos lo así meter cada registro o Collection en un Collection contenedor.

¿Como lo hago y por favor me pueden dar un ejemplo?

Gracias.

== Solución

Creas una Collección y le sumas las Key-Value y después guardas la collection en otra collection pero con Copy(). Ya solo queda añadir la última collection a una Collection[]
gambafeliz 20-04-2022, 11:36
Hola

Necesito actualizar dos tablas donde ambas tienen que ser datos válidos para actualizar o de lo contrario debe no existir la actualización.

¿Como se hace en Gambas y SQLite3 como DataBase?

Gracias.

Nota: Yo hasta ahora siempre uso:
Código:
' Ejemplo de como lo hacia
Dim sSQL AS String = "UPDATE miTabla SET Valor=" & sValor & " WHERE miTabla.ID=" & lblID.Text & ";"      '(Debe dar error)

gConn.Exec(sSQL)


' Mi solución
Dim sSQL AS String = "UPDATE miTabla SET Valor=" & sValor & " WHERE miTabla.ID=" & lblID.Text & ";"      '(Debe dar error)

gConn.Begin()
         gConn.Exec(sSQL)
gConn.Commit()

Catch
        gConn.Rollback()
Páginas (573):    1 320 321 322 323 324 573   
Bienvenido, Invitado
Tienes que registrarte para poder participar en nuestro foro.
Recordarme?
Miembros: 314
Último miembro: LKTFermin2
Temas del foro: 1,770
Mensajes del foro: 9,188
Últimos temas
Programando con la IA
Foro: General
Último mensaje por: tincho, Ayer, 10:02
Respuestas: 16 - Vistas: 7,863
Extern: Uso de la libreri...
Foro: C/C++
Último mensaje por: tincho, 18-08-2026, 22:28
Respuestas: 0 - Vistas: 44
GauchoCAD vuelve a las pi...
Foro: Aplicaciones/Fragmentos de Código
Último mensaje por: tincho, 27-07-2026, 14:15
Respuestas: 15 - Vistas: 20,963
Powered By MyBB, © 2002-2026 MyBB Group.
Made with by Curves UI.