الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

التحكم بالاسكنر من vfp

بدأه lion iraq في 2 مارس 2011 · 21 رد · 5,091 مشاهدة · في قواعد بيانات Visual FoxPro
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم اعزائي

بعد استخدام الدوال والاوامر للتحكم بالادخالات لنظام الوندوز والمساعدة من قبل بعض المبرمجين الاجانب توصلنا الى نموذج غاية في الروعة واعتقد بالامكان استخدامة حسب الاحتياج

وسوف تجد كثرة الاوامر في الايعازات ولكن النقطة المهمة هي استدعاء ملف السكنر واضافة خاصية تحكم في صورة السكنر وهي موجودة في فوكس برو

وارفق لكم النموذج لتعم الفائدة والمساعدة في ايصال المعلومة لان المنتدى واعضاء يستحقون كل الشكر والاحترام في ما استنتجت انهم لا يبخلون في نشر العلم

scaner example.zip

#2

السلام عليكم ،،

اخي الكريم واضح من النموذج أنه عمل جميل ومتعوب عليه،

ولكن للأسف لم يشتغل لنقص أحد العناصر

فهلا تكرمت ورفعت الـ olecontrol الخاص بالتواصل مع السكانر

مع الشكر

أستغفر الله العظيم و أتوب إليه

#3
Shadowz كتب:

السلام عليكم ،،

اخي الكريم واضح من النموذج أنه عمل جميل ومتعوب عليه،

ولكن للأسف لم يشتغل لنقص أحد العناصر

فهلا تكرمت ورفعت الـ olecontrol الخاص بالتواصل مع السكانر

مع الشكر

اهلا بعودتك اخي Shadowz وبالحقيقة ان مشتاق لك ولارائك الموثرة بالاضافة للاعضاء

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

واعذروني لعدم ارفاق خاصية التحكم بالاسكنر

وتحياتي لك اخي Shadowz ولاعضاء المنتدى جميعاً

Scanner.zip

#4

عاشت الايادي

#6

السلام عليكم 

ممكن ايجاد حل للملفات المطلوبة في مثال السكانر 

لانه عند التنفيذ تظهر هذه المسجات

لو امكن اعرف المشكلة وين

تحياتي :D

post-248196-0-05274200-1394397831_thumb.

post-248196-0-16764700-1394397902_thumb.

#7

السلام عليكم

الرسالتين تفيد بعدم تواجد ملفات الارتباط الذي تتحكم بالسكنر وهي ملفاتالتحكم OLE الخاصه بالسكنر

وهي تكون مرفقه او يمكن تنزيلها وتسجيلها في الحاسوب خاصتك لكي يكون تحكم بالسكنر من الفيجوال فوكس برو

#8
lion iraq كتب:

السلام عليكم

الرسالتين تفيد بعدم تواجد ملفات الارتباط الذي تتحكم بالسكنر وهي ملفاتالتحكم OLE الخاصه بالسكنر

وهي تكون مرفقه او يمكن تنزيلها وتسجيلها في الحاسوب خاصتك لكي يكون تحكم بالسكنر من الفيجوال فوكس برو

شكرا ياستاذ ولكن السكنر متعرف على الحاسبة بس هذا الملف لم احصل عليه وكيف يمكن الحصول عليه علما اني اعمل على ويندوز 7

تحياتي

#10

شكرا ياستاذ لمتابعتك المشكلة  :D  :D

#12

السلام عليكم

اليوم جايبلكم عنصر تحكم للسكنر لغرض الربط مع الفيجوال فوكس برو مع امثل ولا اروع

بعد تحميل الرابط

نصب البرنامج

اذهب للمجلد الرئيسي شوف تجد اكثر من مثال ادخل على vfp

وتمتع وعدل

http://www.viscomsoft.com/products/scanner/index.html

#13

السلام عليكم 

تحياتي Lion iraq 

قمت بتنزيل الموجود على الرابط www.viscomsof...nner/index.html

ولكن لا استطيع ان افتح البرنامج في حالة التصميم لرؤية البرمجة ويعترض على form1.sct missing or invalid 

واريد ان اسحب اسكانر من الفورم (pdf) ولكن عند التخزين لا يخزن الملف على شكل pdf 

#15

DECLARE Integer TWAIN_SelectImageSource IN eztw32.dll Integer hWnd

DECLARE Integer TWAIN_AcquireNative IN eztw32.dll Integer hwnd, Integer wPixTypes

DECLARE Integer TWAIN_WriteNativeToFilename IN eztw32.dll Integer hdib, String FileName

DECLARE INTEGER TWAIN_FreeNative IN Eztw32.DLL INTEGER nDIB

hwnd=0

SELECT recive

TWAIN_SelectImageSource (hwnd)

hdib = TWAIN_AcquireNative (hwnd,4)

IF hDib=0

TWAIN_FreeNative(hdib)

RETURN .F.

ENDIF

cfile=alltrim(str(rec))+".pdf"

TWAIN_WriteNativeToFilename(hdib,cFile)

TWAIN_FreeNative(hdib)

COPY FILE &cFile TO rcv\&cFile

IF LEN(alltrim(cfile))<>0 then

APPEND GENERAL docscan FROM &cfile

replace saved WITH 'yes'

thisform.Refresh

DELETE FILE &cFile

thisform.Refresh

endif

#16

اخي العزيز ارفع مثالك وليس الايعاز

اي ضع مثالك في مجلد وقم بضغطهُ

وارفقه في الموضوع

لفحص عنصر التحكم هل يدعم pdf

#17

السلام عليكم 
عند تخزين الملف في الجدول تظهر رسالة خطـأ 
 

 

 

 

 

 

scanform.rar

#18

 اخي العزيز جرب هذا الايعاز

TWAIN_AcquireMultipageFile(0,lower(SYS(5)+SYS(2003)+"\rcv\lioniraq.pdf"))

وانا بانتظار ردك لان بصراحة لم اجرب الايعاز

تحياتي للجميع

#19
lion iraq كتب:

 اخي العزيز جرب هذا الايعاز

TWAIN_AcquireMultipageFile(0,lower(SYS(5)+SYS(2003)+"\rcv\lioniraq.pdf"))

وانا بانتظار ردك لان بصراحة لم اجرب الايعاز

تحياتي للجميع

اخي العزيز الحمد لله على عودة المنتدى اولاً

وفي المثال في المرفقات وهو مختصر يمكنك استخدامهً في مشاريع وحسب التعديل وتاكد من تسجيل عناصر التحكم 

وهذا مثالك السابق يختلف عن الرابط الذي رفعتهُ لك المهم اليك الكود 

DECLARE LONG TWAIN_AcquireMultipageFile IN Eztwain3.dll ;
   LONG hwndApp, ;
   STRING sFileName
   DECLARE LONG TWAIN_IsMultipageAvailable IN Eztwain3.dll

TWAIN_AcquireMultipageFile(0, "lioniraq.pdf")

وكامل المثال في المرفقات شغل ملف البرنامج وسوف ترى 

تحياتي للجميع 

code pdf.zip

#20

السلام عليكم 

شكرا على المساعدة جربت وعمل البرنامج 

من تالق الى تالق إن شاء الله 

#22

سلمت أيديكم 

ولكن البرنامج فيه مشكلة واحدة وهي عند عمل اسكنر لورقة واحدة واريد اخذ نسخة من الصفحة الثانية ، يقوم البرنامج باضافة الملف الثاني على الاول ويلغي الملف الاول الذي قمت باخذ صورة منه وهكذا .

يرجى ايجاد حل لهذه المشكلة وشكرا على الجهود

تم تعديل هذه المشاركة بواسطة كمال العراقي في 18 سبتمبر 2014 في 12:49

مواضيع مشابهة