Problème timer et divers petits bugs VB.NET
Bonjour,
j'ai un timer qui toutes les secondes, vérifie que les path (chemin d’accès) de certains dossiers sauvegardés (je fait un logiciel de sauvegarde automatique) soit toujours existant, et si le dossier a été supprimé de l'ordinateur, il supprime le path d'une listview qui regroupe les sauvegardes effectuées. Cependant, si j'en supprime une, le premier coup de timer (au bout d'une seconde) va bien supprimer la sauvegarde que je supprime(la première dans mes tests), mais le deuxième, va supprimer la deuxième sauvegarde alors qu'elle existe toujours, etc... Lorsque j'effectue une nouvelle sauvegarde après une suppression d'une sauvegarde sur Windows, elle s'affiche dans ma listview puis une seconde après (coup de timer), elle est supprimée.
Voici le code de mon timer et en lien le code de ma fenêtre qui commence a être long :
Code:
1 2 3 4 5 6 7 8
|
Private Sub TimerRefresh_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerRefresh.Tick
For x As Integer = ListSauvegarde.Items.Count - 1 To 0 Step -1
If Not File.Exists(ListePath(x)) Then
ListSauvegarde.Items.RemoveAt(x)
End If
Next
End Sub |
http://pastebin.com/gFs84UtA
Si vous pouvez m'aider, merci
PS : Je profite de mon sujet pour vous demander de l'aide sur d'autres petits bugs où je suis bloqué : je n'arrive pas à afficher des notifications avec NotifyIcon. Je vous donne mon code pour la faire apparâitre :
Code:
1 2 3 4 5 6 7 8
|
If My.Settings.Notification = True Then
IconNotification.BalloonTipIcon = ToolTipIcon.Info
IconNotification.BalloonTipTitle = "Nouvelle sauvegarde"
IconNotification.BalloonTipText = "Une nouvelle sauvegarde a été effectuée"
IconNotification.Visible = True
IconNotification.ShowBalloonTip(1000)
End If |
J'ai bien mit une icône dans les propriétés de mon NotifyIcon. Je précise que j'ai essaie dans un programme vide avec juste un bouton et une notification et ça ne marche pas non plus. Je suis sous Windows 10, c'est peut-être cela ?
Et je voudrais savoir aussi si vous savez comment accorder le "e.Effect = DragDropEffects.All" uniquement si on glisse un dossier dans une listbox.
Merci beaucoup :)