- Visual Basic / VB.NET : Rendre une fenetre modale - CodeS SourceS
- Visual Basic / VB.NET : Créer une fenêtre ronde - CodeS SourceS
- Visual Basic / VB.NET : Fenêtre graphique évoluée - CodeS SourceS
- Visual Basic / VB.NET : Winshadow - ombrer une fenêtre windows - CodeS SourceS
- Visual Basic / VB.NET : Maxplorer double (2 fenetres + 2 barres de recherche) - CodeS SourceS
A voir également:
- Apercu d'une fenêtre en vb.net
- Affichage fenetre en VB.NET ✓ - Forum - Visual Basic
- Changer le titre d'une fenêtre avec vb.net 2005 ✓ - Forum - Visual Basic
- Fenetres en vb.net ✓ - Forum - Visual Basic
- Ouvrir une fenêtre en vb.net ✓ - Forum - Visual Basic
- Visual Basic / VB.NET : Rendre une fenetre modale - CodeS SourceS - Guide
2 réponses
cs_lo4
- Messages postés
- 33
- Date d'inscription
- vendredi 1 février 2002
- Statut
- Membre
- Dernière intervention
- 7 mai 2007
Merci beaucoup pour cette réponse qui m'a été très utile.
En fait, le gestionnaire de tâches n'est qu'une partie de mon programme
qui fera beaucoup plus de choses une fois qu'il sera finitmais
j'essaierai d'y penser à te faire signe une fois qu'il sera terminé .
Voici les lignes de code à mettre dans le projet pour obtenir l'apercu d'une fenêtre connaissant son handle :
Public Structure RECT
Public Left_renommé As Int32
Public Top As Int32
Public Right_renommé As Int32
Public Bottom As Int32
End Structure
<hr size="2" width="100%"> Public Declare Function GetWindowRect Lib "user32" Alias "GetWindowRect" (ByVal hwnd As Int32, ByRef lpRect As RECT) As Int32
<hr size="2" width="100%"> Public Declare Function PrintWindow Lib "user32" (ByVal hwnd As IntPtr, ByVal hDC As IntPtr, ByVal nFlags As UInteger) As IntPtr
<hr size="2" width="100%"> Private Function CaptureWindowPrint(ByVal hWnd As IntPtr, ByVal targetWidth As Integer, ByVal targetHeight As Integer) As Bitmap
Dim memoryImage As Bitmap = New Bitmap(targetWidth, targetHeight)
Dim memoryGraphics As Graphics = Graphics.FromImage(memoryImage)
Dim hDC As IntPtr = memoryGraphics.GetHdc()
PrintWindow(hWnd, hDC, 0)
memoryGraphics.ReleaseHdc()
memoryGraphics.Dispose()
Return memoryImage
End Function
<hr size="2" width="100%"> Private Function CaptureWindowPrint(ByVal hWnd As IntPtr) As Bitmap
Dim r As RECT
GetWindowRect(hWnd, r)
Return CaptureWindowPrint(hWnd, r.Right_renommé - r.Left_renommé, r.Bottom - r.Top)
End Function
Ensuite, il ne reste plus qu'à appeler la fonction CaptureWindowPrint
lo4
En fait, le gestionnaire de tâches n'est qu'une partie de mon programme
qui fera beaucoup plus de choses une fois qu'il sera finitmais
j'essaierai d'y penser à te faire signe une fois qu'il sera terminé .
Voici les lignes de code à mettre dans le projet pour obtenir l'apercu d'une fenêtre connaissant son handle :
Public Structure RECT
Public Left_renommé As Int32
Public Top As Int32
Public Right_renommé As Int32
Public Bottom As Int32
End Structure
<hr size="2" width="100%"> Public Declare Function GetWindowRect Lib "user32" Alias "GetWindowRect" (ByVal hwnd As Int32, ByRef lpRect As RECT) As Int32
<hr size="2" width="100%"> Public Declare Function PrintWindow Lib "user32" (ByVal hwnd As IntPtr, ByVal hDC As IntPtr, ByVal nFlags As UInteger) As IntPtr
<hr size="2" width="100%"> Private Function CaptureWindowPrint(ByVal hWnd As IntPtr, ByVal targetWidth As Integer, ByVal targetHeight As Integer) As Bitmap
Dim memoryImage As Bitmap = New Bitmap(targetWidth, targetHeight)
Dim memoryGraphics As Graphics = Graphics.FromImage(memoryImage)
Dim hDC As IntPtr = memoryGraphics.GetHdc()
PrintWindow(hWnd, hDC, 0)
memoryGraphics.ReleaseHdc()
memoryGraphics.Dispose()
Return memoryImage
End Function
<hr size="2" width="100%"> Private Function CaptureWindowPrint(ByVal hWnd As IntPtr) As Bitmap
Dim r As RECT
GetWindowRect(hWnd, r)
Return CaptureWindowPrint(hWnd, r.Right_renommé - r.Left_renommé, r.Bottom - r.Top)
End Function
Ensuite, il ne reste plus qu'à appeler la fonction CaptureWindowPrint
lo4
nhervagault
- Messages postés
- 6063
- Date d'inscription
- dimanche 13 avril 2003
- Statut
- Modérateur
- Dernière intervention
- 15 juillet 2011
Salut
Je penseque c'est possible
Telecharges les demos des rencontres windows form de juin
vas dans Solution2 - 1 - WinForms\winappMessages
Et tu trouveras les fonctions de caputure d'ecran.
Apres tu captures cette fenetre
Amuses toi bien.
Fais signes par MP quand ton programme est finis
Je penseque c'est possible
Telecharges les demos des rencontres windows form de juin
vas dans Solution2 - 1 - WinForms\winappMessages
Et tu trouveras les fonctions de caputure d'ecran.
Apres tu captures cette fenetre
Amuses toi bien.
Fais signes par MP quand ton programme est finis