[Geoffroy]

Bonjour Aurèle

Et en mettant ClearCollect(MyCollect;{“ton contact par défaut”}) dans OnStart ?

CommentID=NREuwLp5B4BVW3D, PostID=S2lGvxevaSGA6TJ

[Geoffroy]

Bonjour Liam Vaganay ,

Pour éviter que l’utilisateur ne clique trop tôt, on peut mettre un masque sur l’écran le temps que tout soit en place.

Pour cela, il faut encadrer la commande d’ouverture du Form entre les commandes Set(varMasque;true) et Set(varMasque;false).

Ensuite, on ajoute une image (fixe ou animée) avec la propriété Visible égale à varMasque, ainsi qu’un rectangle transparent ou légèrement opaque qui couvre tout l’écran avec la même propriété Visible.

Ca empêchera tout clic intempestif et indiquera à l’utilisateur qu’il doit attendre.

CommentID=5QjsdDM4suOjbHi, PostID=0sTLB1yw2s2Ac8K

[Geoffroy]

Ca peut ressembler à ça. Le problème du timer, c’est qu’on ne sait pas à l’avance combien de temps va prendre l’ouverture du formulaire. Là, le masque disparait dès que le formulaire est disponible.

Set(varMasque;true);;nEditForm(Form1);;nSet(varMasque;false)

SubCommentID=BoVntIqkkiC33Cm, CommentID=5QjsdDM4suOjbHi, PostID=0sTLB1yw2s2Ac8K

[Geoffroy]

Bonjour Jonathan,

Pour trier correctement les dates, il vaut mieux utiliser le format ISO 8601 : 2023-04-03 pour le 3 avril 2023.

CommentID=DV6wyTu7UsnAlEF, PostID=0uHH8DMX5vQiqxp

[Geoffroy]

Bonjour Diane Niango

Je crois que le plus simple serait de créer une variable pour la propriété Visible de chaque bouton (varVisibleA, varVisibleB) et d’ajouter :

Set(varVisibleA;false);;Set(varVisibleB;true) dans le OnSelect de A,

Set(varVisibleB;false) dans le OnSelect de B,

ainsi que Set(varVisibleA;true) ;; Set(varVisibleB;false) dans le OnVisible de l’écran.

Et dans le Patch, je remplacerais Lookup(…) par First(Filter(…). J’ai testé ton code et ça ne met à jour que le premier enregistrement rencontré.

CommentID=I719FdQE4jX0r9E, PostID=AXOr43pgEepHx8C

[Geoffroy]

En relisant tes conditions, je vois qu’il manque un argument dans les Lookup.
Quelles sont les commandes dans les OnSelect de A et B ?

CommentID=toJeeyqH4tObXl4, PostID=AXOr43pgEepHx8C

[Geoffroy]

Bonjour Diane Niango

Effectivement, le code que tu as écrit fait que les deux boutons sont forcément dans des états opposés.

Quelles sont les conditions pour lesquelles les deux boutons doivent être masqués ?

CommentID=1qTqQkWitKpeS2M, PostID=AXOr43pgEepHx8C

[Geoffroy]

A première vue, ton code semble répondre à ton besoin. J’ajouterais quand même une remise à zéro de la variable i après chaque Patch.
Pour t’orienter sur l’utilisation d’une collection, il faudrait connaitre la structure de ta BDD (les colonnes).

CommentID=004m72SvmjqOeHR, PostID=hJZK7MKsLK1NOVx

[Geoffroy]

Tu nous montres le code pour qu’on puisse t’aider ?

CommentID=roPJjOdiPEpwHjk, PostID=hJZK7MKsLK1NOVx

[Geoffroy]

Merci DavidZed , je viens d’envoyer l’astuce à un collègue qui avait justement ce problème.

CommentID=VhvnSAg1MgpdThh, PostID=y0ZxcO2b34G2jMl

[Geoffroy]

Bonjour StevannS

Tu ne peux pas utiliser la fonction Set dans une propriété TrueFill.
Si je comprends bien ton idée, il te suffirait d’écrire dans la propriété TrueFill des autres toggle : If(!toggle1;RGBA1;RGBA2)

CommentID=wwBXMG4CfdRkvRu, PostID=phBcVgxTiB9p2se

[Geoffroy]

Bonjour 666lestat

La lenteur peut être due à beaucoup de facteurs qu’on ne maitrise pas forcément.
Si tu n’as pas besoin que la base soit mise à jour à chaque clic, tu peux essayer d’utiliser des collections et actualiser la base avec la collection une fois que tu quittes l’écran par exemple. Ca limitera le nombre de requêtes vers la BDD.

CommentID=vIqURbiuMTXepBG, PostID=hJZK7MKsLK1NOVx

[Geoffroy]

J’avais trouvé il y a quelque temps une commande pas très simple qui est censé répondre à cette question. Je vous la vends comme je l’ai achetée, sans vérification exhaustive, ni garantie de résultat.
En tout cas, elle ne cause pas de bug (c’est déjà ça) mais ne me demandez pas de vous l’expliquer 😉

If(DateDiff(DateValue(Text(Today();”dd/mm/yyyy”;”Fr-fr”));DateValue(lbl_Date_Courante.Text;”Fr-fr”);TimeUnit.Days)>=-1;

With(

{

dateMin:DateValue(Text(Today();”dd/mm/yyyy”;”Fr-fr”));// la date la plus ancienne

dateMax:DateValue(lbl_Date_Courante.Text;”Fr-fr”) // la date la plus récente

};

CountIf(

//Tous les jours de la période considérée

ForAll(

Sequence(

DateDiff( dateMin ; dateMax ; TimeUnit.Days )+1;

0;

1

);

{jour:DateAdd(dateMin;Value;TimeUnit.Days)}

);

//on y retire…

!Or(

//…les weekends

Weekday(jour;StartOfWeek.Monday) >= 6;

//..et les jours fériés

jour in

//constitution de la totalité des congés sur les années couvertes par la période

With(

{

outputTable: Ungroup(

ForAll(

Sequence( DateDiff(dateMin;DateAdd(dateMax;1;TimeUnit.Days);TimeUnit.Years)+1 ;Year(dateMin) ) As an;

With(

{

Paques:

22+Mod((19*Mod(an.Value;19))+24;30)+Mod((Mod(an.Value;4)*2)+(Mod(an.Value;7)*4)+(Mod((19*Mod(an.Value;19))+24;30)*6)+5;7)-1+Date(an.Value;3;1)

};

Table(

{name:”Jour de l’an”;date:Date(an.Value;1;1)};

//{name:”Pâques”;date:Paques};

{name:”Lundi de Pâques”;date:Paques+1};

{name:”Fête du travail”;date:Date(an.Value;5;1)};

{name:”Victoire 1945″;date:Date(an.Value;5;8)};

{name:”Ascension”;date:Paques+39};

//{name:”Pentecôte”;date:Paques+49};

{name:”Lundi de Pentecôte”;date:Paques+49+1};

{name:”Fête Nationale”;date:Date(an.Value;7;14)};

{name:”Assomption”;date:Date(an.Value;8;15)};

{name:”Toussaint”;date:Date(an.Value;11;1)};

{name:”Armistice 1918″;date:Date(an.Value;11;11)};

{name:”Noël”;date:Date(an.Value;12;25)}

)

)

);

“Value”

)/* Fusionne les tables en une unique sans suppression des doublons */

};

ShowColumns( //Affiche seulement les colonnes nécessaires

GroupBy(

outputTable;

“date”;

“Grouped”//Le dernier paramètre peut avoir n’importe quel nom, celui de la table enfant avec les données groupées

);

//les mêmes colonnes utilisées par le groupBy excepté celle de la table enfant

“date”

)

)

)

)

)

)

CommentID=N79N4H2OhEboySj, PostID=JOkQBIMfO7SBtxA

[Geoffroy]

Bonjour Sylvain

J’ai fait l’essai chez moi et la mise à jour se fait sans quitter l’appli mais il faut attendre plusieurs minutes.
J’ignore si on peut rendre le processus plus rapide.

CommentID=oyuMOGcJCoZtOVo, PostID=fErYaoql1S1AKyn

[Geoffroy]

Dans ce cas, la solution de DavidZed est la plus appropriée.

SubCommentID=7d4Up4qkMQhKfWN, CommentID=QVO7ieT6kqhPQ4Y, PostID=phBcVgxTiB9p2se