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 (566):    1 313 314 315 316 317 566   
Bienvenido, Invitado
Tienes que registrarte para poder participar en nuestro foro.
Recordarme?
Miembros: 295
Último miembro: ncofre98
Temas del foro: 1,748
Mensajes del foro: 9,072
Últimos temas
Problemas con las interru...
Foro: General
Último mensaje por: guizans, 14-12-2025, 18:40
Respuestas: 5 - Vistas: 240
Scrolling un ScrollArea
Foro: Controles/Librerías/Componentes
Último mensaje por: Shordi, 12-12-2025, 07:24
Respuestas: 5 - Vistas: 252
Ordenar en un TableView
Foro: General
Último mensaje por: guizans, 08-12-2025, 23:06
Respuestas: 9 - Vistas: 946
Resultados dispares según...
Foro: Bases de Datos
Último mensaje por: guizans, 04-12-2025, 22:49
Respuestas: 6 - Vistas: 401
Mover un Result a una pos...
Foro: Bases de Datos
Último mensaje por: guizans, 30-11-2025, 19:25
Respuestas: 2 - Vistas: 227
Powered By MyBB, © 2002-2025 MyBB Group.
Made with by Curves UI.