PDA

View Full Version : تهیه تصویر از دسکتاپ



meysam_meysam74
شنبه 04 خرداد 1387, 13:36 عصر
سلام به همه
من می خوام یک عکس از دسک تاپ بگیرم تویه سایت سرچ کردم چیزی پیدا نکردم اگه دوستان لطف کنن و یک سرس برام بزارن که این کارو انجام داده باشه یا این که بگین که چه جوری میشه خاصیت autoredraw رو تویه وی بی دات نت به ترو ست کرد که عکس پاک نشه
ممنون میشم .:لبخندساده::لبخندساده:

john smithair
شنبه 04 خرداد 1387, 16:53 عصر
خوب رفیق این کارو بکن
در فرم لودت این کد رو قرار بده

Dim w As Integer = Screen.PrimaryScreen.WorkingArea.Width
Dim h As Integer = Screen.PrimaryScreen.WorkingArea.Height
Dim bim As New Bitmap(w, h)
Dim g As Graphics = Graphics.FromImage(bim)
Dim siz As Drawing.Size

Me.Visible = False
siz.Width = w
siz.Height = h
g.CopyFromScreen(0, 0, 0, 0, siz)
Me.BackgroundImage = bim

Me.Visible = True
البته توجه داشته باش که این کد تصویر دسکتاپ رو در ضمینه فورمت قرار میده که خوب قابل تغییره.
ضمنا این کد در همین سایت قابل دسترسی که یکی دیگر از عزیزامون نوشته. و من هم از اون جا گرفتم.

saeed_rezaei
شنبه 04 خرداد 1387, 23:53 عصر
سلام.
مثل اینکه جستجوی سایت دچار مشکل شده. چون من خودمم نتونستم با جستجو به این
پست برسم.
http://barnamenevis.org/forum/showthread.php?t=71733

touraj
یک شنبه 05 خرداد 1387, 11:23 صبح
برای گرفتن عکس از دسکتاپ:

meysam_meysam74
دوشنبه 06 خرداد 1387, 11:12 صبح
دوستان بابت یا اطلاعاتتون ممنون
ولی واقا اون autoredraw خیلی جا ها بدرد می خوره مثلا اگه شما بخواین گرافیک فرمتون رو عوض کنید خوب باید برد فورم رو توی حالت نون بزرین و با تابع های api پاینت کنید فرمتون رو خوب اگه ما autoredraw را نداشته باشیم که همش پاک میشه البته دستون درد نکه مشکل من حل شده ممنون