Discussion :

[CryoCid]

Bonjour à tous,

Je viens vers vous pour savoir s'il était possible de libérer une variable (vider son contenu) ?

Car j'ai un petit problème de mémoire sur un programme qui doit rechercher des images dans un dossier spécifique, voici le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
Private Sub ChargementTiles()
 
        ' Déclaration des variables
        Dim sImageTrouve() As String
        Dim sCheminTiles As String = Application.StartupPath & "\Tiles"
        Dim sFormatImage As String = "*.png"
        Dim sNomTiles As String
        Dim MonImage As System.Drawing.Bitmap
        Dim TailleX, TailleY As Integer
 
        ' Vider la liste déroulante
        Me.COMBO_TILES.Items.Clear()
 
        ' On parcourt le dossier des Tiles
        sImageTrouve = Directory.GetFileSystemEntries(sCheminTiles, sFormatImage)
        For Each ListeImage As String In sImageTrouve
            ' Ajout du nom du Tiles dans la liste déroulante
            sNomTiles = Mid(ListeImage, sCheminTiles.Length + 2)
            Me.COMBO_TILES.Items.Add(sNomTiles)
            ' On récupére la taille de l'image
            MonImage = New System.Drawing.Bitmap(ListeImage)
            TailleX = MonImage.Width
            TailleY = MonImage.Height
            ' Ajout dans la liste des Tiles
            Dim Tiles As New ClassTiles(sNomTiles, ListeImage, TailleX, TailleY)
            Me.ListeTiles.Add(Tiles)
        Next
 
        ' Vérifier si des tiles ont été trouvé
        If sImageTrouve.Count = 0 Then
            MsgBox("Aucun Tiles n'a été trouvé dans " & sCheminTiles & ".", MsgBoxStyle.Critical + MsgBoxStyle.OkOnly, "Tiles non trouvés.")
            Application.Exit()
        Else
            ' On sélection le premier Tiles dans la combobox
            Me.COMBO_TILES.SelectedIndex = 0
        End If
 
    End Sub

Donc je lance cette procédure au démarrage de mon programme, elle permet de rechercher dans un dossier "Tiles" les image de format .png.
Puis dans une classe nommé ClassTiles, je stock le chemin de l'image, sa taille et son nom.

En déboguant pas à pas, je me suis rendu compte que c'était la variable "MonImage", que j'utilise pour charger l'image en mémoire afin de récupérer sa taille, qui cumule la taille de l'image à chaque boucle.

Du coup si j'ai beaucoup d'image à rechercher, à l'ouverture, l'application pése déjà + de 100 mo...
Puis si je la réduis et la maximise, elle perd toutes sa mémoire et descend à 20 mo (surement du au Garbadge collector ?)

Du coup je voulais "vider" ma variable "MonImage" à chaque boucle en faisant :

Code :

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

MonImage = Nothing

Mais ça ne fonctionne pas.

Vous avez une idée sur la manière de procédé ?
J'ai peut être mal pensé la récupération des images ?

Surtout que je pensais que les variables étaient détruites après que les procédures soient terminées...

Je vous remercie d'avance pour vos conseils.

Bonne journée!
Cryo

[LeCygne]

Je ne suis pas specialiste de la mémoire, mais j'aurais tendance à dire: Sauf problème de performance, faites confiance au garbage collector, il se declenchera au momment où il le faut.

Vous pouvez tout de même l'aider un peu :

Le "Nothing", c'est très bien.

Code :

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

1
2
 
MonImage = Nothing

En ajoutant un "Dispose" avant, c'est encore mieu. Dispose force l'objet à liberer les ressources qu'il utilise lui même:

Code :

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

1
2
3
 
MonImage.Dispose()
MonImage = Nothing

Une autre méthode à essayer, consiste à ne pas créer, utiliser puis détruire un objet image à chaque iteration, mais plutot de le créer avant la boucle, l'utiliser pendant la boucle, et le detruire après.
Le fait de faire un "new" à chaque iteration, fait que vous abandonnez la reference de votre ancien objet "Image" pour en cree un nouveau, ce qui réalloue de la mémoire. Vous pouvez, à la place, faire un "FromFile()"

Code :

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

1
2
 
MonImage.FromFile("filename As String")

Sans avoir verifié, cela donnerait :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
        MonImage = New System.Drawing.Bitmap()
 
        ' On parcourt le dossier des Tiles
        sImageTrouve = Directory.GetFileSystemEntries(sCheminTiles, sFormatImage)
        For Each ListeImage As String In sImageTrouve
            ' Ajout du nom du Tiles dans la liste déroulante
            sNomTiles = Mid(ListeImage, sCheminTiles.Length + 2)
            Me.COMBO_TILES.Items.Add(sNomTiles)
            ' On récupére la taille de l'image
            MonImage.FromFile(ListeImage)
            TailleX = MonImage.Width
            TailleY = MonImage.Height
            ' Ajout dans la liste des Tiles
            Dim Tiles As New ClassTiles(sNomTiles, ListeImage, TailleX, TailleY)
            Me.ListeTiles.Add(Tiles)
        Next
 
        MonImage.Dispose()
        MonImage = Nothing

[tomlev]

Je ne suis pas specialiste de la mémoire, mais j'aurais tendance à dire: Sauf problème de performance, faites confiance au garbage collector, il se declenchera au momment où il le faut.

Tout à fait
Pour vérifier que le GC va bien collecter la mémoire, tu peux l'appeler explicitement :

Code :

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

GC.Collect()

Mais c'est pas conseillé, fais le juste pour voir que ça libère effectivement la mémoire et enlève le après.

Vous pouvez tout de même l'aider un peu :

Le "Nothing", c'est très bien.

Code :

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

1
2
 
MonImage = Nothing

Non, en l'occurrence ça sert à rien (pour une variable locale), parce la variable va sortir du scope à la fin de la méthode de toutes façons, et sera éligible pour le GC

En ajoutant un "Dispose" avant, c'est encore mieu. Dispose force l'objet à liberer les ressources qu'il utilise lui même:

Code :

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

1
2
3
 
MonImage.Dispose()
MonImage = Nothing

Le Dispose est effectivement une bonne habitude, ça permet de libérer tout de suite les ressources système associées à l'objet (handle HBITMAP par exemple)

Une autre méthode à essayer, consiste à ne pas créer, utiliser puis détruire un objet image à chaque iteration, mais plutot de le créer avant la boucle, l'utiliser pendant la boucle, et le detruire après.
Le fait de faire un "new" à chaque iteration, fait que vous abandonnez la reference de votre ancien objet "Image" pour en cree un nouveau, ce qui réalloue de la mémoire. Vous pouvez, à la place, faire un "FromFile()"

Ca marche pas comme ça : FromFile est une méthode statique, et renvoie une nouvelle instance de Image. Avec ce code la variable MonImage n'est jamais assignée

[CryoCid]

Je vous remercie tous les deux.

Donc je viens de tester et en effet la fonction .Dispose correspond bien à mon attente.
Je pensais qu'elle servait à "Détruire" une variable (donc plus moyen de l'utiliser), car si on fait de même pour une TextBox par exemple, le composant est supprimé.

Donc c'est nikel, je préfère faire cela, car même si le Garbage Collecteur passe ensuite, ça utilise de la mémoire pour rien entre temps...

Je vous remercie encore.

Bonne journée!

[tomlev]

Donc je viens de tester et en effet la fonction .Dispose correspond bien à mon attente.
Je pensais qu'elle servait à "Détruire" une variable (donc plus moyen de l'utiliser), car si on fait de même pour une TextBox par exemple, le composant est supprimé.

"détruire une variable" n'a pas de sens : une variable est seulement une référence vers un objet. Ce que tu peux "détruire", c'est l'objet lui-même, pas la variable. Et ce n'est pas parce que tu détruis l'objet référencé par une variable que tu ne peux plus utiliser la variable (par contre tu ne peux plus utiliser l'objet)

[CryoCid]

Ok tomlev, merci pour cette précision.
Je me suis mal exprimé, mes excuses.

[LeCygne]

Non, en l'occurrence ça sert à rien (pour une variable locale), parce la variable va sortir du scope à la fin de la méthode de toutes façons, et sera éligible pour le GC
....
Ca marche pas comme ça : FromFile est une méthode statique, et renvoie une nouvelle instance de Image. Avec ce code la variable MonImage n'est jamais assignée

C'est bien ce que je disais :

Je ne suis pas specialiste de la mémoire