Discussion :

[Ardely]

Bonjour à tous,
Voici mon problème, a un certain moment de mon application je fais afficher une autre form de cette manière,

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Form1 ;
…
…
…..
Form2Progress.Show; -> // J’ai un progressbar et un timer sur cette form
 
Procedure Boucle_RPL;  // cette boucle dure environ 2 minutes
 
Form2Progress.Close;   // on arrete le timer et on ferme…
...
...

Sur la Form2Progress j’ai mis un TprogressBar avec un timer, ce progressbar tourne du min au max permanent sans fin… quand la procedure Boucle_RPL est fini la Form2Progress.Close devient active qui fais arrêter le timer et ferme l’affichage.

Le problème est que, en entrant dans la Boucle_RPL l’affichage de la Form2Progress ne ce fait plus tout est bloquer..donc je pense qu’il faut faire fonctionner Form2Progress indépendamment.

Merci beaucoup pour une solution, salutations

[batyann811]

A priori tu as 2 solutions.

1ere solution (la plus simple) : Dans ta boucle tu insères de appels à Application.ProcessMessages comme ça ton interface graphique reste active. L'inconvénient c'est que le code de ta boucle n'est plus indépendant de l'interface.

2eme solution : Tu exécutes ta boucle dans un thread.

Dans le dossier 'examples/multithreading' de ton installation lazarus tu trouveras le projet singlethreadingexample1 qui correspond à la première solution et le projet multithreadingexample1 qui correspond à la 2eme.