
Putain qu'est ce qu'on apprend en ce moment sur le FR

Code : Tout sélectionner
;; ajouter cette structure
Structure jour_ancien
Id.i ; numero du gadget
Date_text.s ; la date lié au gadget
Text.s ; le text associé a ce jour
Array Alarme.s(24) ; 24 Alarmes possible par jours
Array Message_alarme.s(24)
Array Action.b(24) ; active desactive une alarme
EndStructure
Global Newlist jour_ancien.jour_ancien()
Code : Tout sélectionner
ExtractJSONList(JSONValue(0), jour())
Code : Tout sélectionner
ExtractJSONList(JSONValue(0), jour_ancien())
Code : Tout sélectionner
Procedure conversion()
Foreach jour_ancien() ; ancienne list
SelectElement(jour(),compteur_list) ; on selectionne l'element de la nouvelle liste
jour()\Id.i= jour_ancien()\Id.i; numero du gadget
jour()\Date_text.s=jour_ancien()\ Date_text.s; la date lié au gadget
jour()\text.s[0]=""
jour()\text.s[1]=jour_ancien()\Text.s ; pour lui attribuer la valeur text
For i=2 to 10
jour()\text.s[i]=""
Next i
For i=0 to 24
jour()\Alarme.s(i)= jour_ancien()\Alarme.s(i); 24 Alarmes possible par jours
jour()\Message_alarme.s(i)=jour_ancien()\Message_alarme.s(i)
jour()\Action.b(i)=jour_ancien()\Action.b(i) ; active desactive une alarme
NExt i
compteur_list=compteur_list+1
Next
EndProcedure
Code : Tout sélectionner
ExtractJSONList(JSONValue(0), jour_ancien())
Code : Tout sélectionner
ExtractJSONList(JSONValue(0), jour())
par$8:00$
et remplacement du message de l'alarme-8:00-
par[message de l'alarme]
du coup ça désactive l'alarme qui ne nous embêtera plus ...(message de l'alarme )
elle peut etre de la forme$8:00$ [voici une alarme avec son message qui se declenche a 8 heures]
ou meme :$8:00$
[voici une alarme avec son message qui se declenche a 8 heures]
on peut mettre plusieurs alarme (24 Max par jour) , et sur les 10 pages que compose une journée$8:00$
[voici
une alarme
avec son message
qui se declenche a 8 heures]
$8:00$ [la premiere alarme qui se declenche a 8 heures]
on peut ecrire du text au millieu
$9:00$ [la deuxieme alarme qui se declenche a 9 heures] ; Etc etc ....
Je ne pensais meme pas que ça marcherai sous LinuxJohnJohnsonSHERMAN a écrit :J'ai testé sous KDE Plasma (environnement de bureau linux), avec le théme sombre, et ton application s'intégre super bienJ'adore !
pourtant sous windows 10 ça marche bien .... comprends pas- Au démarrage la fenêtre disparait, et je ne sais pas comment la faire revenir... (cliquer sur l'icône du systray ne marche pas) J'ai donc commenté la ligne "Minimize(State)"
ça c'est pas vraiment un probleme-Pour un petit écran (ordi portable) la fenêtre est trop haute et le bas n'est pas visible, dommage. Enfin il ne me manque pas grand chose.
N'empêche, joli boulot ! Merci
Code : Tout sélectionner
Global Hauteur_fenetre=600 ; Minimum 400 ;o)
non, car je n'ai jamais voulu que ce soit en plein ecranMarc56 a écrit :Utilises DesktopHeight(0) comme ça ça passera partout![]()