[RainBow]

كود :

Private Function getSnapshot(ByVal snapshotForm As Form) As Bitmap
        With snapshotForm
            .FormBorderStyle = Windows.Forms.FormBorderStyle.None
            Dim bmp As New Bitmap(PictureBox1.Width, PictureBox1.Height, Imaging.PixelFormat.Format32bppArgb)
            Dim g As Graphics = Graphics.FromImage(bmp)
            g.CopyFromScreen(New Point(.Location.X, .Location.Y), New Point(0, 0), bmp.Size)
            .FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable
            Return bmp
        End With
    End Function
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Form2.PictureBox1.Image = getSnapshot(Form2)
        Form2.PictureBox1.Image.Save("C:\Users\RainBow\Desktop\Name.jpg")
    End Sub

الفكره هى اخذ صوره لى اداة معينه فى الفروم

[سعود]

لا طبعا ممكن تستخدم الكود لتصوير حركاتك على الكمبيوتر وتحفظهم بمسار معين

[سعود]

[h=1]مثال لاخذ لقطات مستمرة اثناء عملك بالكمبيوتر (مع سؤال كيف اظهر مؤشر الماوس)[/h]

[أبو يعقوب]

لتصوير أداة معينة تستخدم الكود : DrawToBitmap وهو موجود في كل الادوات

مثال عندي فورم به زر - بتن ، عند الضغط عليه يقوم برسم الزر في صورة ويجعلها خلفية الفورم

PHP كود :

Dim bmp = New Bitmap(Button1.Width, Button1.Height)

        Button1.DrawToBitmap(bmp, Me.ClientRectangle)
        Me.BackgroundImage = bmp
        Me.BackgroundImageLayout = ImageLayout.Stretch 


[RainBow]

سعود كتب :[h=1]مثال لاخذ لقطات مستمرة اثناء عملك بالكمبيوتر (مع سؤال كيف اظهر مؤشر الماوس)[/h]

أبو يعقوب كتب :لتصوير أداة معينة تستخدم الكود : DrawToBitmap وهو موجود في كل الادوات

مثال عندي فورم به زر - بتن ، عند الضغط عليه يقوم برسم الزر في صورة ويجعلها خلفية الفورم

PHP كود :

Dim bmp = New Bitmap(Button1.Width, Button1.Height)

        Button1.DrawToBitmap(bmp, Me.ClientRectangle)
        Me.BackgroundImage = bmp
        Me.BackgroundImageLayout = ImageLayout.Stretch 


جزاكم الله خير