Capture d'écran Visual Basic

Bonjour

j'aurais besoin d'un coup de main, je développe un programme qui contient plusieurs onglets, ses onglets sont générer automatiquement via une boucle. j'ai donc en faite 3 onglets générés plusieurs fois. je voudrais faire une capture d’écran de chaque onglet. j'utilise le code ci dessous : ( exemple de l'onglet 3)

Code:

---

1 2 3 4 5 6

Dim wid3 As Integer = TabPage(3).Width Dim hgt3 As Integer = TabPage(3).Height Dim bmp3 As Bitmap = New Bitmap(TabPage(3).Width, TabPage(3).Height) TabPage(3).DrawToBitmap(bmp1, New Rectangle(0, 0, TabPage(3).Width, TabPage(3).Height)) bmp3.Save("c:\Analyse\" & var1 & "_bmp1.bmp") bmp3.Dispose()

---

ce qui se passe et que je ne comprend pas c'est que les captures d’écrans fonctionnent bien pour le troisième onglet de chaque boucle, mais les captures de l'onglet 1 et 2 ne fonctionnent pas (image blanche).

Chose que je comprend pas non plus, si j’inhibe les captures d écrans de l onglet 2 et 3, cette fois si c'est les captures de l'onglet 1 fonctionnent.

La je suis un peut perdu, si l'un d'entre vous a une explication.

Merci d'avance

hey ! , si je serais toi j'essaierais de faire un petit refresh. entre chaque screen . J'ajouterais même un petit Thread.Sleep entre en même temps. On dirait que tu n'as pas de soucis avec la méthode screen mais comme tu dois les enchainer rapidement le systeme n'a pas le temps de le dessiner.

Bonsoir

Merci, pour ta réponse , je vais essayer en insérant une pause, par contre comment fais tu un refresh ?

Bonjour

Bon, je viens d'essayer avec un thread avant et après la capture d’écran, et j ai ajouter un refresh avant la capture, et c'est pareil :?

Code:

---

1 2 3 4 5 6 7 8 9 10

Threading.Thread.Sleep(500) TabPage(3).Refresh() Dim wid3 As Integer = TabPage(3).Width Dim hgt3 As Integer = TabPage(3).Height Dim bmp3 As Bitmap = New Bitmap(TabPage(3).Width, TabPage(3).Height) TabPage(3).DrawToBitmap(bmp3, New Rectangle(0, 0, TabPage(3).Width, TabPage(3).Height)) bmp3.Save("c:\Analyse\" & TXT_ENSEIGNE.Text & "\" & TXT_DEPARTEMENT.Text & "--------" & "\" & TXT_numero.Text & "\Capture\" & TXT_ENSEIGNE.Text & "_" & TXT_VILLE.Text & "_" & Txt_Date_Debut.Text & "_ERREUR__N°" & boucle1 & ".bmp") bmp3.Dispose()   Threading.Thread.Sleep(500)

---

Bonjour

Je viens de trouver la solution :lol:, j ai rajouté avant ma capture un refresh et un show.

Code:

---

1 2 3

TabPage(3).Refresh() TabPage(3).Show()

---

Merci FayaKevin90HD pour ton aide .