عکس گرفتن از Desktop

[Google Man]

سلام

چطور میشه از Desktop عکس گرفت . من میخوام حجم عکس خیلی کم باشه . مثلا حدود 100 یا 200 کیلوبایت .

اگر با شرایط بالا نمیشه , میشه کاری کرد که از وسط صفحه به اندازه یک مربع عکس بگیره ولی در عوش حجمش کم بشه یا چیزی تو این مایه ها...

ممنون .

[HoseinVig]

سلام دوست جدید و عزیز
به این سایت خوش آمدی امیدوارم بتونیم از معلومات همدیگه استفاده کنیم
هم حجم عکس قابل تنظیمه ، هم سایز و محلی که باید از اون عکش گرفته بشه...
اين تابع از يک پنجره عکس مي گيرد و آن را در يک کنترل گرافيکي چاپ مي کند.
گر تابع کار خود را با موفقيت به پايان برساند مقدار بازگشتي يک عدد غير صفر و اگر تابع با خطايي مواجه شود مقدار بر گشتي صفر خواهد بود

hdc : هندل بافت گرافيکي کنترلي مقصد
x : نقطه شروع ترسيم عکس جديد در راستاي افق
y : نقطه شروع ترسيم عکس جديد در راستاي عمود
nWidth : عرض تصوير جديد
nHeight : ارتفاع تصوير جديد
hSrcDC : هندل بافت گرافيکي کنترلي که بايد از آن عکس گرفته شود
xSrc : فاصلهء تصوير از سمت چپ کنترل
ySrc : فاصلهء تصوير از بالاي کنترل
dwRop : نحوه ترسيم تصوير . ثابت هاي زير
SRC_PAINT : تصوير کنترل مبدا و مقصد را با هم Or کرده و در کنترل مقصد قرار مي دهد
SRC_ERASE : تصوير پنجره مقصد را Not کرده و با پنجره مبدا Or مي کند و نتيجه را در کنترل مقصد مي نويسد
SRC_INVERT : تصوير کنترل مبدا و مقصد را با هم Xor کرده و در کنترل مقصد قرار مي دهد
SRC_AND : تصوير کنترل مبدا و مقصد را با هم And کرده و در کنترل مقصد قرار مي دهد
SRC_COPY : تصوير کنترل مبدا رو بدون دستکاري در کنترل مقصد قرار مي دهد

کد:

Private Const SRC_PAINT = &HEE0086
Private Const SRC_ERASE = &H440328
Private Const SRC_INVERT = &H660046
Private Const SRC_AND = &H8800C6
Private Const SRC_COPY = &HCC0020

Private Declare Function BitBlt Lib "gdi32.dll" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal XSrc As Long, ByVal YSrc As Long, ByVal dwRop As Long) As Long

[Google Man]

ممنون از توضیحات عالی شما .

اما متاسفانه من تازه دارم ویژوال بیسیک یاد میگیرم برای همین هم زیاد با این مسائل آشنایی ندارم . اگر ممکنه یک سورس مثل همین چیزی که گفتم بزارید تا بیشتر متوجه بشم .
ممنون از پاسختون.

[1120]

سلام دوست عزیز .

این هم یک نمونه کامل .

موفق باشید .

[Google Man]

ممنون

ولی عزیز توی این مثلا من 0 و 0 رو کردم 500 و 500 . بعد این از مقداری از صفحه عکس گرفت و اونجایی رو که عکس نگرفت رو سیاه گذاشت . من میخوام فقط از همونجا عکس بگیره یا اینکه اگه اونطوری هست حجمش کم بشه در حدود 200 کیلوبایت

[download69]

من این سورس رو از همین فروم گرفتم ولی یک مشکل داشت که برطرفش کردم اونم این بود که خود نرم افزار هم هنگام عکس گرفتن در تصویر می افتاد و خیلی ضلیع بود و دیگر که فارسیش هم کردم
این فایل exe هستش

  ScrCaptureProject.rar (اندازه: 4.37 KB / تعداد دفعات دریافت: 135)

[Google Man]

این که فایل exe هست

[CRazYFULL]

من این سورس رو از همین فروم گرفتم ولی یک مشکل داشت که برطرفش کردم اونم این بود که خود نرم افزار هم هنگام عکس گرفتن در تصویر می افتاد و خیلی ضلیع بود و دیگر که فارسیش هم کردم
این فایل exe هستش

چرا فايل اجرايی قرار داديد؟ به نظر شما اين پست شما چه کمکی به ايشون ميکنه؟

[Google Man]

یه Form1.Visible=False یا فارسی کردن کاری نداره که شما بخوای فایل exe قرار بدی . خودم تو سایت پیداش کردم :

http://forum.iranled.com/showthread.php?tid=15208

[download69]

یه Form1.Visible=False یا فارسی کردن کاری نداره که شما بخوای فایل exe قرار بدی . خودم تو سایت پیداش کردم :

http://forum.iranled.com/showthread.php?tid=15208

من فکر خوده برنامه رو می خوای خوب بیا اینم سورسش خودت رو خفه کردی حالا مثل اینکه من گفتم کار شاخی کردم

[Google Man]

یه Form1.Visible=False یا فارسی کردن کاری نداره که شما بخوای فایل exe قرار بدی . خودم تو سایت پیداش کردم :

http://forum.iranled.com/showthread.php?tid=15208

من فکر خوده برنامه رو می خوای خوب بیا اینم سورسش خودت رو خفه کردی حالا مثل اینکه من گفتم کار شاخی کردم

نه داداش ما به خاطر اینچیزا خودمون رو خفه نمیکنیم !

پست بالا رو هم بخونی میبینی که خودم پیداش کردم !

ولی اونچیزی که میخواستم نبود .ضمنا OCX هم میخواد !