Afficher une date dans un gadget

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
YvesRossignol
Messages : 133
Inscription : lun. 28/mars/2016 19:09

Afficher une date dans un gadget

Message par YvesRossignol »

J'essai de terminer mon premier soft... à 55 ans c'est pas facile... mais je ne peux croire qu'il n'y a pas de fonction pour afficher la date d'aujourd'hui dans un gadget.... on peut seulement afficher les secondes... et les transformer...

Yves
Yves Rossignol
YvesRossignol
Messages : 133
Inscription : lun. 28/mars/2016 19:09

Re: je suis confus....

Message par YvesRossignol »

finalement j'ai trouvé... c'était vraiment trop simple

je m'excuse....
Yves Rossignol
Avatar de l’utilisateur
djes
Messages : 4252
Inscription : ven. 11/févr./2005 17:34
Localisation : Arras, France

Re: je suis confus....

Message par djes »

Salut ! Quand tu trouves quelque chose, fais partager, ça ne prend qu'une seconde, et ça fait vivre le forum ! Merci :)
Avatar de l’utilisateur
falsam
Messages : 7324
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

Re: je suis confus....

Message par falsam »

djes a écrit :Salut ! Quand tu trouves quelque chose, fais partager, ça ne prend qu'une seconde, et ça fait vivre le forum ! Merci :)
+1
Réponse tardive histoire de faire vivre le forum ^^
YvesRossignol a écrit :... mais je ne peux croire qu'il n'y a pas de fonction pour afficher la date d'aujourd'hui dans un gadget....
Tu as raison de ne pas y croire et je pense que tu as trouvé la solution en utilisant la fonction FormatDate(Mask$, Date)

Code : Tout sélectionner

OpenWindow(0, 0, 0, 400, 300, "Afficher une date", #PB_Window_SystemMenu|#PB_Window_ScreenCentered)
TextGadget(#PB_Any, 10, 12, 80, 22, "Nous sommes le")
StringGadget(0, 90, 10, 70, 22, "")

;Afficher la date du jour
SetGadgetText(0, FormatDate("%mm/%dd/%yyyy", Date())) 

Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
Pour allez plus loin, on peut aussi sélectionner une date avec DateGadget()

Code : Tout sélectionner

OpenWindow(0, 0, 0, 400, 300, "Afficher une date", #PB_Window_SystemMenu|#PB_Window_ScreenCentered)
TextGadget(#PB_Any, 10, 12, 80, 22, "Nous sommes le")
DateGadget(0, 90, 10, 80, 22, "")

Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
Configuration : Windows 11 Famille 64-bit - PB 6.20 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
YvesRossignol
Messages : 133
Inscription : lun. 28/mars/2016 19:09

ma réponse pour date()

Message par YvesRossignol »

ou faire tout simplement ceci...

Code : Tout sélectionner

Date$ = FormatDate("%yyyy/%mm/%dd", Date())
  Time$ = FormatDate("%hh:%ii:%ss", Date())
  SetGadgetText(#Gadget_Gestion_aujourd,Date$+Chr(32)+Time$)
Yves Rossignol
Répondre