Discussion :

[moradsoft]

bonjour
j'affiche des enregistrements dans une table mémoire base sur une requete et j'aimerais bloquer l'application et mettre une jauge au fur et a mesure que la table se remplie
j'ai essayer avec ce code mais la barre se remplie avant que la table termine son remplissage

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
HExécuteRequête(REQ_POINTAGEPC,hRequêteDéfaut,SAI_Date6,SAI_Date7)
HLitPremier(REQ_POINTAGEPC)
 
i est un entier
Maxim est un entier = HNbEnr(REQ_POINTAGEPC)
 
	JAUGE_SansNom1..Valeur=Maxim
 
 
TableAffiche(TABLE_REQ_POINTAGEPC)

merci

[frenchsting]

Tu dois mettre ton code ans l'affichage d'une ligne de ta table.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
//Déclaration de variable dans le code de la fenêtre
jg est un entier
HExécuteRequête(REQ_POINTAGEPC,hRequêteDéfaut,SAI_Date6,SAI_Date7)
HLitPremier(REQ_POINTAGEPC)
 
jg = 0
JAUGE_SansNom1..BorneMin = 0
JAUGE_SansNom1..BorneMax = HNbEnr(REQ_POINTAGEPC)
 
TableAffiche(TABLE_REQ_POINTAGEPC)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
// Code Affichage d'une ligne de la table 
jg++
JAUGE_SansNom1..Valeur = jg

A voir et adapter suivant ton cas : Inconvénient, cela ralentit l'affichage. Si ton nombre de lignes à afficher est important, il faudra songer à ne réafficher ta jauge que toutes les 10, 20, 50 lignes.

[moradsoft]

j'ai plus que 9000 enregistrements j'ai adapter le code mais n'aucun effet sur la jauge ça bouge même pas

[frenchsting]

Est-ce que le code est exécuté ? As-tu mis un point d'arrêt ?

[moradsoft]

Oui le code s execute le probleme c est que je vois pas tous les enregistrements de la table en un seul coup il faut cliquer sur l ascenseur pour que la table se charge j ai penser a mettre une jauge pour patienter l utilisateur et en attendant que la table se remplisse

[frenchsting]

si au lieu du jauge..valeur = jg, tu mets un message(jg), vois tu le nombre augmenter dans la zone de message de la fenêtre ?