Obliger un PictureBox à conserver son image si l'image a été dessinée avec du code dans vb.net

Question

Mes images sont parfois effacées de tous les dessins quand ils ont fini de créer l'image, ou parfois à mi-chemin. Appeler GC.Collect() avant le début du dessin permet de dessiner MORE avant qu'il ne disparaisse, mais comment puis-je l'empêcher de disparaître complètement?

Ceci est en vb.net

Merci!

Answer 1

Un moyen facile de persister images tirées en .Net est de faire le dessin sur un objet Bitmap séparé, puis définissez la propriété d'image de PictureBox égale à la Bitmap, comme ceci:

Bitmap bmp = new Bitmap(pictureBox1.Width, pictureBox1.Height); 
using (Graphics g = Graphics.FromImage(bmp)) 
{ 
    // draw whatever 
} 
pictureBox1.Image = bmp; 

Désolé, c'est C#, mais il devrait illustrer le principe OK. Une autre façon de conserver les images dessinées est de faire le dessin dans l'événement Paint de PictureBox, mais cela signifie que le code de dessin s'exécutera chaque fois que le contrôle doit se repeindre (chaque fois qu'un autre formulaire est déplacé) etc.). La méthode ci-dessus (définition de la propriété Image du contrôle) est plus simple à faire.

Answer 2

Dans le cas ci-dessus, lorsque l'objet "bmp" ou "g" est hors de portée et que les données sont collectées, l'image de la zone d'image change. Je pense que l'image est toujours copiée. J'ai essayé bmp.clone pour copier l'image sur la boîte à image, mais quand bmp est ramassé, l'image de la boîte à images disparaît. Dans mon cas, j'ai un certain nombre de (déterminées au moment de l'exécution) de telles images à assigner à des cadres d'image créés à l'exécution.

Dim bm As New Bitmap("C:\picture.bmp") 
Dim thumb As New Bitmap(42, 30) 
Dim g As Graphics = Graphics.FromImage(thumb) 

g.InterpolationMode = Drawing2D.InterpolationMode.HighQualityBicubic 
g.DrawImage(bm, New Rectangle(0, 0, 42, 30), New Rectangle(0, 0, bm.Width, _bm.Height), GraphicsUnit.Pixel) 
pbxHead.Image = thumb.Clone() 

g.Dispose() 
bm.Dispose() 
thumb.Dispose()