Soyez le premier à donner votre avis sur cette source.
Snippet vu 9 406 fois - Téléchargée 38 fois
Private buffer As Bitmap Private Declare Function StretchBlt Lib "gdi32" (ByVal hdc As IntPtr, ByVal X As Integer, _ ByVal Y As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, _ ByVal hSrcDC As IntPtr, ByVal xSrc As Integer, ByVal ySrc As Integer, _ ByVal nSrcWidth As Integer, ByVal nSrcHeight As Integer, ByVal dwRop As Integer) As Integer Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim controlGraphics As Graphics = Me.PictureBox_Graphique.CreateGraphics ' graphique form Const SRCCOPY As Integer = &HCC0020 Dim controlSize As Size controlSize = Me.PictureBox_Graphique.ClientSize() buffer = New Bitmap(controlSize.Width, controlSize.Height) Dim bufferGraphics As Graphics = controlGraphics.FromImage(buffer) Dim bufferHdc As IntPtr = bufferGraphics.GetHdc 'hdc de la form Dim controlHdc As IntPtr = controlGraphics.GetHdc StretchBlt(bufferHdc, 0, 0, controlSize.Width, controlSize.Height, _ controlHdc, 0, 0, controlSize.Width, controlSize.Height, SRCCOPY) bufferGraphics.ReleaseHdc(bufferHdc) controlGraphics.ReleaseHdc(controlHdc) buffer.Save("C:\Documents and Settings\Ludo\Bureau\eeeezzz.Jpg", System.Drawing.Imaging.ImageFormat.Jpeg)
27 févr. 2005 à 17:27
merci
28 févr. 2005 à 10:25
controlGraphics.Graphics.Clear(Color.AliceBlue)
--- je ne sais plus si faut mettre graphics ou pas, c'est suivant le eventarg, dans ce cas la , je ne crois pas
De plus je ne pense pas que tu sois obligé d'utiliser l'api strech ..http://fr.gotdotnet.com/quickstart/winforms/
28 févr. 2005 à 12:17
5 mars 2005 à 16:48
c'est des vielle methode de VB6 ca
GDI+ => code entierement managé
System.Drawings
System.Drawings.Graphics
dim toto as graphics = me.CreateGraphics
ensuite manip du graphics et a chque modif, enregistrement du grpah dans la var pour enviter les zone non repainte
et a l'eve,nt paint on reapplique le graph
c tout ca qu'il faut saovoir pratiquement, liser des bouquin .net
et arreter les API en .net c lent a coté du managé
+++
5 mars 2005 à 17:05
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.