منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : نسخ صورة الخلفية من سطح المكتب
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كاتب الموضوع : AhmedEssawy

يعتمد الأمر على API's وتحديداً من خلال الدالة PaintDesktop الموجودة في المكتبة user32 والتي تحتوي اضافة لما سبق العديد من الدوال المفيدة .


كود :
Private Declare Function PaintDesktop Lib "user32" _
(ByVal hdc As Long) As Long

Private Sub Command1_Click()
PaintDesktop Picture2.hdc
End Sub