Shell 12-12-2022, 13:53
Buenas a todos/as!.

He hecho un ejemplo que me dice los días que quedan para navidad.
Quizás no es la forma más recomendable o no entiendo el problema adecuadamente.

Es una aplicación que se va a ejecutar una vez entremos en el escritorio. Siempre, todos los días.

Tengo una fecha estimada, el día de navidad y la fecha actual. Resto la diferencia y me dice los días que quedan. Hasta ahí bien. ( fue un rollo el tema de fechas ).
A la hora de representar esto, me surgen dudas, probablemente de no entender el comportamiento de la clase.

Si fuera un icono en la bandeja de entrada o panel superior, momentáneamente al mostrarse el escritorio, me gustaría mostrar el icono y
un mensaje en el icono que puede ser un globo, "Quedan x's días para navidad", luego el mensaje desaparece y el icono se queda en la bandeja.

¿ Es esto el funcionamiento "normal" de un icono en la bandeja de entrada ?.  ( Por si debo cambiar la forma de presentar el mensaje )
- Algunos muestran valores como es valores de temperaturas
- Otros simplemente actúan cuando haces clic en ellos

Sigo.

El icono aparece "pegado" al selector de áreas de trabajo, a su izquierda no detrás de este, claro el selector del área de trabajo es otro icono a su manera.
Si hago clic en el (esto no es lo que quiero) el mensaje aparece en el formulario ( que es un control ), ya que por lo que parece un trayicon no es un control.

Puedo hacer el proyecto con formulario o sin este (no es realmente necesario), haciendo un proyecto de consola y añadiendo componentes.

Os muestro el código:

Código:
Const FECHANAVIDAD As String = "25/12/2022"

Private fechaestimada As Date
Private icono As TrayIcon

Public Sub Form_Open()
 
  'Quiero pasarla en el formato "dd/mm/yyyy"
  fechaestimada = CadenaConvAFecha(FECHANAVIDAD)
 
  icono = New TrayIcon As "Manejador"  
  With icono  
    .Picture = Stock["18/clock"]
    .Show    
  End With
 
End

''Convierte la cadena a un tipo fecha
Public Function CadenaConvAFecha(sfecha As String) As Date
 
  Dim fechatemp As Date
  Dim asfecha As String[]
 
  'Fecha como cadena se convierte a un array
  asfecha = Split(sfecha, "/")
 
  'asfecha[0] = día , asfecha[1] = mes , asfecha[2] = año  
  'Convierto a tipo fecha
  fechatemp = Date(asfecha[2], asfecha[1], asfecha[0])
 
  Return fechatemp
 
End

Public Sub Manejador_Click()
 
  'FIXME:Esto no se muestra en el icono, se muestra en el formulario, que es un control.
  With Balloon
    .Delay = 5000
    .Font = Font["Arial, 8, Bold, italic"]
    .Info("Quedán " & DateDiff(Now, fechaestimada, gb.Day) & " días para Navidad", Me)    
  End With
 
End
Recomendaciones. Wink
Realmente no quiero hacer clic en el icono, solo quiero que me muestre un mensaje y desparezca este.
He pensado hasta en un timer, pero es que trayicon tiene algo parecido a un reloj.

Subo el proyecto.

Saludos
Archivos adjuntos
.gz
MostrarGloboEnIconoBarra-0.0.1.tar.gz (Tamaño: 12.11 KB Descargas: 3)
tincho 09-12-2022, 12:19
Hola amigos.
[Imagen: vCFgXNS.png]
Hace un tiempo que estamos desarrollando en conjunto con TecoIDE un programa que al comienzo surgio como "laboratorio" para experimentar con OpenGL 3D pero que actualmente tiene una madurez tal que permite usarse para visualizar de archivos STL y OBJ.
El experto en 3D por supuesto es TercoIDE que actualmente es nuestro referente OpenGL en gambas, yo hice solamente la GUI, los iconos y las traducciones.
Esta en la granja de gambas y en el repo de gitlab:
https://gitlab.com/belmotek/stl-viewer
2022.12.15 - El proyecto ahora se llama deja de llamarse STL-Viewer y pasa a llamarse 3D Models Viewer, puesto que sirve para ver, ademas de STL, el formato OBJ. Por el momento la ruta gitlab es la misma
Espero que se diviertan como nos hemos divertido nosotros.
[Imagen: grfbClo.png]
[Imagen: lpT1skE.png]
  • 1 - Abrir un modelo 3D
  • 2 - Cargar una textura
  • 3 - Color del objeto 3D
  • 4 - Color de fondo.
  • 5 - Estructura de alambre on-off
  • 6 - Usar la textura on-off
  • 7 - Vistas ortogonales estandar
  • 8 - Cámara ortográfica on-off
Los demás botones que no están reseñados o bien no son relevantes para el manejo del programa o no funcionan todavía.

[Imagen: uBYrb9j.png]
Esta es una vista de estructura de alambre.
[Imagen: nai69sX.png]
Esta es una vista con la cámara normal, (no ortométrica). Para modelos técnicos es conveniente activar la cámara ortométrica.

Como nota general me gustaría decir que colaborar en provectos de software es muy gratificante pero a veces (al principio generalmente) no es sencillo ya que cada programador tiene su propia visión de las cosas y requiere, sobre todo, paciencia.
Luego se puede aprender mucho mas que programando en solitario y los resultados están a la vista, en menos de un mes salio este programa ¿No esta mal verdad?
tincho 07-12-2022, 22:24
Hola amigos.
En otro tema se estaba discutiendo la forma de conectar una Raspberry Pi y otra computadora.
Empezaron a aparecer protocolos por todas partes, pero si uno va por el camino Servidor/HTTP/Cliente sobre internet mas temprano que tarde aparecerá el problema del cambio de IP pública. Es para estos casos que decidí crear este tema con un resumen de los sitios que me parecieron mas interesantes.

Servicios de pago de DNS
https://www.noip.com

Servicios gratuitos de DNS
Nota: la info proviene de: https://alternativeto.net/software/no-ip/

Duck DNS
https://www.duckdns.org/
Free dynamic DNS hosted on Amazon EC2.
Duck DNS es un servicio gratuito que apuntará un DNS (subdominios de duckdns.org) a una IP de su elección. El código fuente se puso a disposición bajo GNU GPLv3 el 13 de mayo de 2016, en http://bit.ly/DuckSource_GDrive . Sin embargo, el código no parece estar disponible ni en el enlace ni en algún repositorio (github, gitlab, ...)

FreeDNS
https://freedns.afraid.org/
Alojamiento gratuito de subdominios, alojamiento gratuito de dominios, backup dns gratuito, alojamiento DNS IPv6 inverso (forward/reverse);
Redireccionamiento de URL gratuito [redireccionamiento web];
20 subdominios gratis por dominio, úselos sólo en sus propios dominios
Apunte INSTANTANEAMENTE sunombre.afraid.org o sunombre.com a cualquier IP o URL;
DNS dinámico soportado, varios clientes para Win32 y UNIX disponibles
Actualmente hay 86.232 dominios más aparte de afraid.org en nuestro grupo de dominios compartidos;
Soporta DNS round robin (múltiples direcciones IP para 1 nombre de host);
Soporta IPv6 forward AND reverse (tanto .int como .arpa).

Dynu Dynamic DNS
https://www.dynu.com/
Dynu ofrece un servicio gratuito de DNS dinámico para tunombre.dynu.com y tunombre.com. Dispone de una API sencilla (URL de actualización) y ofrece software cliente de actualización gratuito. Otras características Soporte IPV6 redirección web (redirección al puerto 80, reenvío de URL) subdominios Registro MX DNS round robin (múltiples direcciones IP para 1 nombre de host) configuración offline (redirección a mensaje offline o URL offline) registros DNS personalizados (TXT, SPF, HINFO, SRV, etc.) Página de registro: https://www.dynu.com/ControlPanel/AddDDNS

NameCoin
https://www.namecoin.org/
Namecoin es una tecnología experimental de código abierto que mejora la descentralización, la seguridad, la resistencia a la censura, la privacidad y la velocidad de ciertos componentes de la infraestructura de Internet, como los DNS y las identidades.
(Para los más técnicos, Namecoin es un sistema de registro y transferencia de pares clave/valor basado en la tecnología Bitcoin).
Bitcoin libera dinero - Namecoin libera DNS, identidades y otras tecnologías.

nsupdate.info
https://www.nsupdate.info/
nsupdate.info es un servicio dns dinámico. Normalmente lo necesitas para que tu router (u otro cliente compatible con dyndns2) pueda actualizar un nombre de host, de forma que no necesites saber o averiguar tu dirección IP actual. nsupdate.info es sencillo, usable, gratuito, amigable, seguro y respeta tu privacidad.

Programas de Linux
Estos servicios no sirven de nada si no les decimos que la IP cambio y para ello existen algunos programas que lo hacen:

DDClient
DDClient es un cliente de actualización IP basado en Perl para sistemas basados en *nix, incluyendo Linux, FreeBSD y Mac OS X. Soporta el funcionamiento como demonio, así como optimiza las actualizaciones para múltiples nombres de host y alias.
Generalmente viene preinstalado, pero si no lo esta:
apt-get install ddclient
Para la configuración echen un vistazo a:
https://www.dynu.com/DynamicDNS/IPUpdateClient/DDClient

Nota: Si alguien sabe de otro programa o servicio, por favor no dude en comentarlo.

Eso es todo, espero que les resulte de utilidad.
Páginas (557):    1 232 233 234 235 236 557   
Bienvenido, Invitado
Tienes que registrarte para poder participar en nuestro foro.
Recordarme?
Miembros: 286
Último miembro: Emilio Uribe
Temas del foro: 1,720
Mensajes del foro: 8,934
Últimos temas
Archivos .ods
Foro: General
Último mensaje por: tincho, 01-07-2025, 18:54
Respuestas: 8 - Vistas: 242
Publicidad
Foro: Sobre gambas-es.org
Último mensaje por: tincho, 01-07-2025, 18:48
Respuestas: 6 - Vistas: 328
Web con gambas, a ver si ...
Foro: WebApp/WebForms
Último mensaje por: tincho, 01-07-2025, 17:47
Respuestas: 41 - Vistas: 32,574
Un sistema de ayudas cont...
Foro: Videotutoriales
Último mensaje por: guizans, 22-06-2025, 19:55
Respuestas: 3 - Vistas: 304
Crear una aplicación para...
Foro: Bases de Datos
Último mensaje por: Shell, 29-05-2025, 20:11
Respuestas: 11 - Vistas: 1,482
Powered By MyBB, © 2002-2025 MyBB Group.
Made with by Curves UI.