تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
التقاط صورة من الماسح الضوئي scanner
#1
كاتب الموضوع : Boutemine Oualid

عليك أولا بتنزيل الملف الموجود في المرفقات و هو مكتبة TWAIN الخاصة بالتحكم في الكاميرات و الماسح الضوئي
الملف في المرفقات


كود :
[color=#0000ff]Declare[/color] [color=#0000ff]Function[/color] TWAIN_AcquireToClipboard [color=#0000ff]Lib[/color] "[color=#8b0000]EZTW32.DLL[/color]" ([color=#0000ff]ByVal[/color] hwndApp&, [color=#0000ff]ByVal[/color] wPixTypes&) [color=#0000ff]As[/color] [color=#0000ff]Long[/color]
[color=#0000ff]Declare[/color] [color=#0000ff]Function[/color] TWAIN_SelectImageSource [color=#0000ff]Lib[/color] "[color=#8b0000]EZTW32.DLL[/color]" ([color=#0000ff]ByVal[/color] hwndApp&) [color=#0000ff]As[/color] [color=#0000ff]Long[/color]

[color=#008000]'عملية التقاط صورة من الماسح الضوئي ووضعها في خلفية النافذة[/color]
R = TWAIN_SelectImageSource([color=#0000ff]Me[/color].hwnd)
[color=#008000]R : هي قيمة تمكنك من معرفة نتيجة العملية'[/color]
[color=#008000]'اذا كانت 0 فهناك خطأ وإلا فالعملية تمت بنجاح[/color]
[color=#008000]'Refresh لاعادة رسم منطقة هيكل النافذة[/color]
Me.Refersh
[color=blue]If[/color] R = 0 [color=blue]then[/color]
msgbox ("Error: لا يمكن التقاط الصورة")
[color=blue]end[/color] [color=blue]if[/color]
[color=#008000]عملية التقاط الصورة من الماسح الضوئي ' ووضعها في الClipBoard[/color]
R = TWAIN_AcquireToClipboard([color=#0000ff]Me[/color].hwnd, 0)
Image1.Picture = Clipboard.GetData(vbCFDIB)


الملفات المرفقة
.zip   Eztw32.zip (الحجم : 28.64 ك ب / التحميلات : 407)
}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  نسخ صورة الفورم إلى الحافظة RaggiTech 0 2,189 17-10-12, 01:11 AM
آخر رد: RaggiTech
  نسخ صورة الخلفية من سطح المكتب RaggiTech 0 1,965 17-10-12, 01:11 AM
آخر رد: RaggiTech
  طباعة صورة ملئ صفحة الطباعة RaggiTech 0 2,044 17-10-12, 12:44 AM
آخر رد: RaggiTech
  تطبيق كامل منقول - قراءة وتعديل صورة Jpeg RaggiTech 0 2,391 17-10-12, 12:35 AM
آخر رد: RaggiTech
  انشاء صورة bitmap من خلال API RaggiTech 0 2,098 17-10-12, 12:24 AM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم