Discussion :

[Paul Van Walleghem]

Bonjour à tous !
Tout d’abord, permettez-moi de vous présenter ma situation en deux mots. J’ai un handicap moteur qui m’empêche de tenir un livre et d’en tourner les pages moi-même. Je reprends l’université dans deux semaines et vraiment besoin d’avoir une solution aisée pour accéder à la littérature non électronique.
Je scan tous mes livres et je conserve chaque page dans un fichier BitMap distinct.
Je crée une application VB.NET où, d’une part, je stocke les références bibliographiques et, d’autre part, je peux lire les pages scannées grâce au parcours d’une table de ma base de données.
A cette fin, j’écris une procédure d’importation des pages dans la DB au cours de laquelle je peux effectuer une rotation de toutes les BitMaps et les découper en deux lorsqu’il s’agit de doubles pages (des options bien sûre).
En vous écrivant tout cela, j’espère que le code de la classe (en pièce jointe) vous sera plus clair. Cette classe est héritée du composant « BackgroundWorker » Elle contient, entre bien d’autres, deux Sub pouvant servir de méthode DoWork. L’une effectue la rotation des BitMaps. L’autre leur découpage.
C’est la procédure de rotation des BitMaps qui a un comportement fort curieux. Elle s’exécute deux fois d’affilée sans raison apparente. Lorsque je suis dans le débogueur, j’observe que si le End Sub est exécuté une première fois, VB retourne directement au Sub de la même procédure. Il recommence son traitement. Puis ressort tout à fait normalement. (Je vous jure de ne pas avoir fumé la moquette…)
Auriez-vous une idée de la raison de cette double exécution ? Comment l’empêcher et faire en sorte que la tâche d’arrière-plan ne s’exécute qu’une seule fois ?
Merci de vos conseils avisés !
Avec mes sincères salutations,

[tomlev]

Salut,

Tu es sûr que ça n'exécute pas aussi 2 fois le découpage ? Parce que tu as mis la clause "Handles MyBase.DoWork" sur les 2 méthodes, ce qui (il me semble) ajoute automatiquement un handler sur l'évènement. Et dans ton RunDoWork, tu ajoutes à nouveau un handler à l'évènement DoWork. Donc en principe, ça devrait toujours exécuter bmpRotation_DoWork et bmpDecoupage_DoWork, ET le handler que tu as rajouté explicitement dans RunDoWork. Soit 3 tâches au total, dont 2 identiques...

A mon avis, si tu enlèves les clauses "Handles MyBase.DoWork", ça devrait fonctionner normalement.

Sinon, personnellement j'aurais fait ça un peu différemment : j'aurais plutôt overridé la méthode OnDoWork et décidé à ce niveau là ce qu'il faut faire :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Protected Overrides Sub OnDoWork (e As DoWorkEventArgs)
 
    Select Case True
        Case prptTraitement = "Rotation"
            bmpRotation_DoWork(Me, e)
        Case prptTraitement = "Découpage"
            bmpDecoupage_DoWork(Me, e)
    End Select
 
    MyBase.OnDoWork(e)
End Sub

Et pour lancer ton worker, tu appelles juste RunWorkerAsync en passant la collection en paramètre

[Paul Van Walleghem]

ok, ça marche! Merci du conseil et de tes éclaircissement!