Shordi 24-09-2021, 21:33
Acabo de subir a gitlab el programa CCP, que es el encargado de conectar tu máquina con el servidor VPN y gestionar los accesos a las unidades compartidas y menús que tengas derecho.
Lo llamé CCP porque yo ya tenía un puñado de aplicaciones corriendo en la empresa y cada una utilizaba sus propias bases de datos de usuarios, permisos, etc. Con este programa (bueno, con uno muy parecido llamado igual) unifiqué y controlé todo de manera centralizada y eso me recordó al programa malvado de la peli de Tron: El Control Central de Procesos... y no me pude resistir.
Si os lo descargáis, en principio y salvo malvado error traidor, sólo tenéis que ejecutarlo y ponerle como usuario "usuario" y como clave "usuario22" y ya está.
Veréis que no va demasiado rápido, pero os recuerdo que el servidor es poco más que una Raspberry Pi, 1gb de ram y 1 de ancho de banda, creo recordar, lo que no ocurriría en un entorno real de trabajo.
Hay mucho que discutir y que plantear: El tema de qué nivel de control se establece en las máquinas, La confección de software que enlace y facilite todo esto que estamos viendo en el foro y los vídeos (sueño con un programa instalador/configurador para servidores y otro para clientes), y muchos detalles que ahora mismo no recuerdo, pero lo que hoy presento puede ser una base para la discusión real con los que estéis interesados.
Lo podéis encontrar en https://gitlab.com/shordi/ccp.
También he hecho un video-demo del asunto. Lo tenéis en
Espero que os guste.
Saludos
Se me olvidaba, si alguno quiere cotillear la BD vía phpmyadmin podéis hacerlo en http://3.15.30.125/phpmyadmin/index.php con el usuario "usuario" y la clave os la doy en un privado, que me da yuyu ponerla aquí en abierto.
Saludos
Lo llamé CCP porque yo ya tenía un puñado de aplicaciones corriendo en la empresa y cada una utilizaba sus propias bases de datos de usuarios, permisos, etc. Con este programa (bueno, con uno muy parecido llamado igual) unifiqué y controlé todo de manera centralizada y eso me recordó al programa malvado de la peli de Tron: El Control Central de Procesos... y no me pude resistir.
Si os lo descargáis, en principio y salvo malvado error traidor, sólo tenéis que ejecutarlo y ponerle como usuario "usuario" y como clave "usuario22" y ya está.
Veréis que no va demasiado rápido, pero os recuerdo que el servidor es poco más que una Raspberry Pi, 1gb de ram y 1 de ancho de banda, creo recordar, lo que no ocurriría en un entorno real de trabajo.
Hay mucho que discutir y que plantear: El tema de qué nivel de control se establece en las máquinas, La confección de software que enlace y facilite todo esto que estamos viendo en el foro y los vídeos (sueño con un programa instalador/configurador para servidores y otro para clientes), y muchos detalles que ahora mismo no recuerdo, pero lo que hoy presento puede ser una base para la discusión real con los que estéis interesados.
Lo podéis encontrar en https://gitlab.com/shordi/ccp.
También he hecho un video-demo del asunto. Lo tenéis en
Espero que os guste.
Saludos
Se me olvidaba, si alguno quiere cotillear la BD vía phpmyadmin podéis hacerlo en http://3.15.30.125/phpmyadmin/index.php con el usuario "usuario" y la clave os la doy en un privado, que me da yuyu ponerla aquí en abierto.
Saludos
Como cargar SVG por código en los controles
tincho 24-09-2021, 00:26
Hola amigos.
Les presento un método que uso bastante seguido en mis programas ya que ademas de la excelente calidad gráfica que se logra, evita el molesto problema de las imágenes "negativas"
Como cargar los archivos
Como cambiar el color antes de aplicarlos
Saludos.
Les presento un método que uso bastante seguido en mis programas ya que ademas de la excelente calidad gráfica que se logra, evita el molesto problema de las imágenes "negativas"
Como cargar los archivos
Código:
For Each oCont In [pTools]
For Each o In oCont.Children
If Object.Type(o) = "ToolButton" Then
z = (o.h - 8)
sPic = "./svg" &/ o.Tag & ".svg"
If Exist(sPic) Then
svg = dsk.Contrary(sPic, "#0066b3")
pic = Image.FromString(svg).Stretch(z, z).Picture
o.Picture = pic
Endif
Endif
Next
NextComo cambiar el color antes de aplicarlos
Código:
'' Replace a color in an svg file with one that contrasts with the background of the desktop theme
Public Function Contrary(sFile As String, sColor As String) As String
Dim svg As String
If Application.DarkTheme Then
svg = Replace(File.Load(sFile), sColor & ";", "#eeeeee;")
Else
svg = Replace(File.Load(sFile), sColor & ";", "#000000;")
Endif
Return svg
EndSaludos.
Shell 23-09-2021, 14:41
Buenas!.
Linux MInt 19.3.
La que fallaba creaba efectos raros visuales, parpadeaba el editor, las aplicaciones que salen en la lista, parpadeaba el recuadro,
el fondo dentro del editor donde van los accesos rápidos, como guardar e imprimir, pasaba el ratón por encima de los botones y
se iban activando.....que show.
Desde un principio tuve la idea por que fallaba.
Así que compilé de fuente gambas 3.15.2 y funcionó..la eliminé y volvía a instalar la 3.16.3, el mismo error.
Entonces usé la opción de usar información del sistema y quise ver las diferencia entre las dos distros.
Me estaba dando problemas el método de entrada. En la que fallaba estaba usando en el sistema como método de entrada: XIM
y se debe usar "ninguno". "Al menos en la aplicación que lo permite" en Linux MInt. En su día me llamaría la atención que no mostrase ninguno
y le puse XIM.
Comprender y configurar diferentes métodos de entrada
A ver si luego os pongo las diferencia de los dos archivos. Gracias a Meld.
La cosa es que solo lo hacía el editor de Gambas. Tenía otros IDE pero eran de texto. Ninguno con formularios.
P.d. Este poste debería estar en instalación.
Saludos
Linux MInt 19.3.
La que fallaba creaba efectos raros visuales, parpadeaba el editor, las aplicaciones que salen en la lista, parpadeaba el recuadro,
el fondo dentro del editor donde van los accesos rápidos, como guardar e imprimir, pasaba el ratón por encima de los botones y
se iban activando.....que show.
Desde un principio tuve la idea por que fallaba.
Así que compilé de fuente gambas 3.15.2 y funcionó..la eliminé y volvía a instalar la 3.16.3, el mismo error.
Entonces usé la opción de usar información del sistema y quise ver las diferencia entre las dos distros.
Me estaba dando problemas el método de entrada. En la que fallaba estaba usando en el sistema como método de entrada: XIM
y se debe usar "ninguno". "Al menos en la aplicación que lo permite" en Linux MInt. En su día me llamaría la atención que no mostrase ninguno
y le puse XIM.
Comprender y configurar diferentes métodos de entrada
A ver si luego os pongo las diferencia de los dos archivos. Gracias a Meld.
La cosa es que solo lo hacía el editor de Gambas. Tenía otros IDE pero eran de texto. Ninguno con formularios.
P.d. Este poste debería estar en instalación.
Saludos
Bienvenido, Invitado
Últimos temas
Error de sistema "Demasia...
Foro: GeneralÚltimo mensaje por: Shordi, 11-05-2025, 19:42
Respuestas: 3 - Vistas: 92
controlar el Activado/Des...
Foro: GeneralÚltimo mensaje por: Shordi, 10-05-2025, 08:08
Respuestas: 1 - Vistas: 67
Nuevo componente gb.qt6.w...
Foro: Controles/Librerías/ComponentesÚltimo mensaje por: Shordi, 09-05-2025, 09:21
Respuestas: 1 - Vistas: 79
Conexión Bluetooth: RFCOM...
Foro: Hardware & IoTÚltimo mensaje por: jguardon, 06-05-2025, 16:57
Respuestas: 5 - Vistas: 217
gb.db2: columnas calculad...
Foro: Bases de DatosÚltimo mensaje por: guizans, 04-05-2025, 21:02
Respuestas: 14 - Vistas: 569