قراءة شريط باراكود وإضافته إلى قاعدة بيانات

السلام عليكم و رحمة الله وبركاته

أخي ابحث في هذا الرابط في المنتدى وفقك الله

/index.ph...%C7%D1%DF%E6%CF

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

اولا انواع الاجهزة التي تقرأ الباركود هي:

1- قارئ عادي(يوصل على مخرج com,usb ...) كل القوارئ التي تأتي الان USB و قليل منها يأتي Com يتميز القارئ الذي

له مخرج USB بأنه عند قرأة باركود بالجهاز فأنه مباشرة يلقي القيمة الى اي محرر نصوص

يعني بطريقة اخرى اذا كان هناك Textbox شارة الماوس بداخله فأنه سوف يتم وضع القيمة مباشرة فيه

اما القارئ الذي له وصلة Com فأنه يتوجب عليك عمل برنامج يقوم بالقراءة من ال Com و معالجة القيمة بعد ذلك حيث يمكنك الاعتماد على MSComm في ذلك

2- جامع بيانات(Data collecter) يقوم بقرأة الباركود و تخزينها ضمن الذاكرة الخاصة به و بعد لك يتم وصل الجهاز الى الحاسب

ليتم عبر برنامج معين (يعمتد على نوع الجهاز)نقل البيانات الى ملف او يتم ربطه بشكل مباشر مع برنامجك و ذلك عن طريق SDK التي تؤمنها الشركة المصنعة للجهاز

و في كل الطريقتين انت فقط تتعامل مع String يمثل رقم الباركود و ما عليك الا ان تضع حقل في قاعدة البيانات مؤلف مثلا من 50 محرف

و من ثم تخزن فيه القيمة لك مادة

هذه عبارة عن مقدمة سريعة اذا اردت اي تفاصيل فأن بالخدمة

طبعا كلامك اخي waeldalol هو بصورة عامة

و يطبق على اغلب الحالات لكن هناك حالات خاصة لا يتم فيها الاعتماد

على مبدأ وجود مؤشر الفأرة في اداة TextBox مثلاً

خاصة اذا كان تشفير الباركود معقدا كـ PDF417 و كان القارئ موصولا على منفذ USB

على فكرة الـ SDK التي تأتي مع اجهزة تجميع البيانات

مهمتها الاساسية هي تمكين برنامجك من تشغيل القارئ بنفسه دون الستعانة ببرامج اخرى و ضبط الاعدادات المناسبة

للقراءة كالفترة الزمنية و نوع الباركود الذي سيتعامل معه القارئ و هل سيعيد

الـ Check Digit ام لا .....الخ

جزاكم الله خيراً

أرجوا توضيح فكرة كيفية قراءة الباراكود عن طريق الكومبيوتر

وايراد مثال بسيط

فرجينا شطارتك يا waeldalol

مع خالص تحياتي لكل اعضاء هذا المنتدى

والسلام عليكم ورحمة الله وبركاته

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

و الذي يوصل على Com تحتاج لعمل كتلة برمجية في برنامجك لكي تتلقى القيمة من مخرج ال Com و تعالجها

ارجوا الاجابة على السؤال التالي لكي افيدك؟

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

أولاً :

مشكور أخوي على جهودك وجزاك الله خيراً

ثانياً :

اقتباس

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

بالنسبة لنوع القارىء فأنا احدده.

أرجو ذكر النوعين.

ثالثاً :

اقتباس

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

و الذي يوصل على Com تحتاج لعمل كتلة برمجية في برنامجك لكي تتلقى القيمة من مخرج ال Com و تعالجها

أنت ذكرت إنشاء كتل برمجية لكي تتلقى القيمة ولكن كيف وما هي البروسيجرات والفانكشنات والطرق المستخدمة؟؟؟؟!؟

الباراكود يتكون من عدة كلمات مثل: اسم المادة - رقمها - تسلسلها - سعرها .

كيف تتم معالجة كل قيمة على حدة.

وذكرت مسبقاً أنني أريد إضافتها إلى قواعد بيانات.

وماهي الطريقة التي يفهم بها البرنامج الباراكود.

أرجو ايراد مثال يوضح الطيقة مع الشرح.

وجزاك الله خيراً مقدماًً

والسلام عليكم ورحمة الله وبركاته

يا اخي الكريم الباركود يحتوي على رقم المادة فقط و لا يحتوي على اسمها و لا على سعرها

ما هو الباركود: الباركود هو عبارة عن الخطوط السوداء التي تراها في اي مكان. داخل الباركود يتم تخزين بيانات معينة

هذه البيانات تمثل مفتاح مرشح في قاعدة البيانات

ماذا عليك ان تفعل في لكي تتعامل مع الباركود:

يجب عليك ان تضع مثلا واجهة لكي تضيف مادة معينة و لتكن مثلا كتاب

تضع في قاعدة البيانات مثلا

الاسم

السعر

الناشر

رقم الباركود

حيث ان رقم الباركود يكون Unique اي وحيد اي لا يمكن ان يكون هناك مادة اخرى لها نفس الرقم

و البيانات التي تحوي وصف للمادة تكون مخزنة في قاعدة البيانات و بما انك عرفت رقم الباركود فأنه بأمكانك الوصول الى

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

اي بشكل مختصر رقم باركود على اللصاقة يكون مطابق لرقم باركود في قاعدة بيانات و الذي يمثل مفتاح مرشح و يكون هناك العديد

من الحقول الاخرى التي تمثل مواصفات المادة مثل السعر و الاسم ....

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

بناء على رقم الباركود.

مثلا يمكن استخدام تعليمة SQL مثل هذه

select * from TBL_Materials where barcodeNum = قيمة الباركود المقروئة من الجهاز

ممكن ان تسأل كيف سوف اربط المادة مع الباركود؟

لو فرضنا انه جاءنا كتاب جديد الى المكتبة و نريد ادخاله الى قاعدة البيانات

فتقوم مثلا بعرض واجهة لادخال هذه الكتاب الجديد

اسم الكتاب , السعر, اسم الناشر, رقم الباركود

الان تقوم بقراءة رقم الباركود من على الكتاب و تضعه في حقل رقم الباركود الظاهر على الواجهة و من ثم تقوم بالحفظ

و بالتالي اصبح رقم الباركود مرتبط تماما مع المادة اي اذا عرفت رقم الباركود فانك بالتأكيد سوف تصل الى هذه المادة

سؤال اخر: كيف سوف اقوم باخراج هذا الكتاب من المكتبة عن طريق رقم الباركود؟

تقوم مثلا بعرض واجهة لاخراج المواد و بعد ذلك يقوم المستخدم بقراءة رقم الباركود و بالتالي تعرض انت بيانات المادة

من اسم و سعر ... في الواجهة بناء على رقم الباركود و تعرض مثلا نوع العملية هل هي ادخال او اخرج

سؤال كيف اجلب رقم الباركود من الجهاز الى الكمبيوتر

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

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

و لكن هل الى هنا الامر تمام ام هناك مشاكل او انّ هناك شيئ معين لم تفهمه يتطلب منك الامر الاطلاع على سير الانظمة التي تعمل

على الباركود حتى تفهم ما اقوله لك

خير ما افتتح به كلامي هو الحمد لله والصلاة والسلام على سيدنا محمد بي عبد الله وعلى آله وصحبه وسلم

أما بعد فجزاك الله يا أخي في الله عني كل الخير.

كل شي تمام والفضل يعود إلى الطريقة التي قمت فيها بالشرح ولكن هناك نقطتين لم توضحهما وهما :

أولاً :

اقتباس

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

أنا لا أريد أن أجلب القيمة إلى داخل محرر نصوص.

أنا أريد أن أعرف كيف أجلب القيمة داخل جدول قواعد بيانات.

ثانياً :

أرجو أن تورد مثالاً لكلا التطبيقين الـ USB و الـ COM ليستفيد الجميع في هذا المنتدى وللمزيد من المعرفة.

مع شرحك الوافي والكافي الذي يثلج الصدر

أما بالنسبة لجعل رقم الباراكود مفتاحاً فقد قمت بذلك سابقاً ولكني لم أكن أعرف طريقة جلب الرقم من الباراكود.

أرجوا أن ترد علي في أسرع وقت.

وجزاك الله خير الجزاء في الدنيا والآخرة.

وأخيراً السلام عليك ورحمة من الله والبركات

السلام عليكم ورحمة الله وبركاته

وينك يا أخي بالله waeldalol ليش ما بعثت لي الجواب لغاية الآن

آني مستني جوابك على أحر من الجمر.

أخوك أبو النور

انا اسف في تأخري بالرد عليك اخي الكريم بسبب تعطل المنتدى

اقتباس

لا أريد أن أجلب القيمة إلى داخل محرر نصوص.

أنا أريد أن أعرف كيف أجلب القيمة داخل جدول قواعد بيانات

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

و الله انا احترت معك يعني بما انك عامل برنامج محاسبة يجب ان تكون على دراية كافية في قواعد البيانات

اقتباس

أرجو أن تورد مثالاً لكلا التطبيقين الـ USB و الـ COM ليستفيد الجميع في هذا المنتدى وللمزيد من المعرفة.

ال USB و ال Com هما طريقة وصل جهاز الباركود مع الكمبيوتر

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

لو فرضنا اننا نريد اتمتة عمليات الادخال و الاخراج في مكتبة معينة دعنا نتخيل السيناريو التالي:

لدينا مكتبة تقوم على بيع الكتب فان العملية التي يمكن ان تتم ضمن هذه المكتبة هي

1- ادخال كتب جديدة الى المكتبة

2- بيع كتب

قم بوضع مثلا جدول للكتب(المواد) تضع فيه الخصائص التالية (رقم الباركود - اسم المادة - السعر- الكمية)

عند ادخال الكتب الى المكتبة يتم قراءة رقم الباركود بواسطة القارئ من قبل المستخدم و الذي يمثل مادة بما انه مفتاح اساسي

تبحث في جدول الكتب هذا اذا كان الكتاب موجود تقوم تقوم بزيادة الكمية للمادة التي لها نفس رقم الباركود المقروئ بمقدار واحد مع تنبيه المستخدم الى ذلك

و اذا لم يكن موجود تفتح له واجهة لاضافة مادة جيدة.

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

هذه هي الفكرة العامة و عليك ان تتطبق انت وتعمل بيدك لانجاز ما تريد

الشيئ الاخير الذي يمكن ان استطيع ان اقدمه لك هو كيفية الربط مع القوارئ التي يتم وصلها باستخدام مخرج com

لعمل ذلك عليك استخدام مكون اسمه MSComm هو مكون ActiveX تقوم بواسطته بالاتصال على Com و هناك حدث له

اسمه OnComm هذا الحدث يشتعل عندما يصبح هناك قيمة على مخرج Com

انا سوف اقدم لك برنامج يقوم بارسال القيمة المقروءة من على مخرج ال Com و يعطيك اياها على اي محرر نصوص و بذلك يصبح القارئ من نوع Com مثل القارئ من نوع USB من حيث التعامل معه. البرنامج في المرفقات

هذا البرنامج يجب عليك ان تضعه في Startup لكي يشتغل مع اقلاع Windows.

اما اذا كنت تريد عمل ذلك في برنامجك فسوف اقوم بمساعدتك

wedge.rar

أخي waeldalol السلام عليك ورحمة الله وبركاته

اقتباس

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

و الله انا احترت معك يعني بما انك عامل برنامج محاسبة يجب ان تكون على دراية كافية في قواعد البيانات

أولا لاتهتم ولاتحتار

أنت فهمتني غلط

أنا أريد أن أعرف طريقة قراءة الباراكود وجلب الرقم إلى داخل البرنامج أما باقي العمليات فهي علي ولكل طريقته وفنه للتعامل مع قواعد البيانات

ولإزالة الشبهة وتوضيح الأمر أكثر أنا أريد كود لقراءة شريط الباراكود وعرض قيمته داخل Label

ولك جزيل الشكر والسلام عليكم ورحمة الله وبركاته

البرنامج لم يعمل وأعطاني خطأ

الفئة غير مسجلة

اقتباس

البرنامج لم يعمل وأعطاني خطأ

الفئة غير مسجلة

سبب ذلك ان مكون MSComm غير مسجل في النظام عندك لذلك لم يعمل البرنامج سوف اعطيك ملف ال Setup لهذا البرنامج و لكن حجمه كبير شوي 4.66MB اعطني ايميل لكي ارسله لك

جرب اولا الضغط على ملف الريجستري الذي في المرفق مع نسخ ملف MScomm الى مسار البرنامج اذا ما مشي الحل عطيني ايميلك و سوف ارسله لك

اقتباس

أنا أريد أن أعرف طريقة قراءة الباراكود وجلب الرقم إلى داخل البرنامج أما باقي العمليات فهي علي ولكل طريقته وفنه للتعامل مع قواعد البيانات

ولإزالة الشبهة وتوضيح الأمر أكثر أنا أريد كود لقراءة شريط الباراكود وعرض قيمته داخل Label

يااخي انا من الاول عم اقول لك محرر نصوص و انت مو فاهم علي شو يعني محرر نصوص

اعمل form جديدة و ضع فيها edit و من ثم ضع المؤشر داخل هذا Edit ثم اذا كنت تستخدم قارئ USB سوف يضع لك القيمة التي بداخل الباركود ضمن هذا Edit مباشرة دون عمل اي شيئ اما اذا كنت تستخدم قارئ يوصل على مخرج Com فانه يجب ان تستخدم البرنامج الذي اعطيتك اياه لكي يصبح القارئ Com يعمل بنفس اسلوب USB

هل فهمت علي و لا لأ

Exe.rar

أخي في الله waeldalol السلام عيك ورحمة الله وبركاته

أشكر جهدك معي أولاً وجزاك الله خيراً

اقتباس

يااخي انا من الاول عم اقول لك محرر نصوص و انت مو فاهم علي شو يعني محرر نصوص

اعمل form جديدة و ضع فيها edit و من ثم ضع المؤشر داخل هذا Edit ثم اذا كنت تستخدم قارئ USB سوف يضع لك القيمة التي بداخل الباركود ضمن هذا Edit مباشرة دون عمل اي شيئ اما اذا كنت تستخدم قارئ يوصل على مخرج Com فانه يجب ان تستخدم البرنامج الذي اعطيتك اياه لكي يصبح القارئ Com يعمل بنفس اسلوب USB

هل فهمت علي و لا لأ

يا أخي أنا فهمان عليك بس ياترى المستخدم الذي سيستخدم البرنامج سيفهم هذا الشيء

وافرض أن الأكتيف لم يكن على الـ Edit فهذا يعني النتيجة صفر

ورغم ذلك شرحت للشركة التي تريد أن تستخدم البرنامج هذا الشيء ولكن رفضوا

أما بالنسبة إلى الإيميلي فهو موجود في أسفل الرد وأول حرف منه كبير

أو هذا الإيميل : usec@scs-net.org

ولك جزيل الشكر

والسلام عليكم ورحمة من الله وبركاته

أرجوا وضع كود ومثال لقراءة شريط الباراكود وإظهاره ضمن Label لتفادي كل الشبه ولإختصار الوقت

وإذا لم تريد وضع الكود اصنعه على شكل ملف DLL وأذكر طريقة استدعائه

اخي الكريم في كل البرامج التي عملتها كنت افصل بين التطبيق الذي اعمله وبين كيفية قراءة الباركود لانه من المحتمل ان تتغير طريقة الربط من جديد

اما اذا كنت تريد ان تضع ذلك في برنامجك فلك حرية الخيار و لكن انتبه ان القارئ من نوع USB الحديث لا يمكن التحكم في كيفية

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

يريد ان يقرأ من القارئ يجب عليه وضع المؤشر على Edit

في المثال المرفق برنامج صغير للقراءة من Com و ارسالها مباشرة الى اي Label

لكي تستطيع ان تعمل Complie عليك اضافة مكون MSComm هو مكون ActiveX و تستطيع عمل ذلك من خلال

Component>ImportActiveXControl

من الواجهة المفتوحة امامك اختار Microsoft Comm Control6.0

ثم قم بالضغط على Install

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

هذا الكود هو حدث Comm اي ان هناك قيمة على مخرج Com هذا الحدث للمكون السابق

لاحظ انني اضع القيمة في LabelBarcode اذا اردت ان ترسلها الى اي نص مفتوح استخدم التابع SendKey

ثم مرر له القيمة

procedure TForm1.Comm32Comm(Sender: TObject);
var
 s:string;
 i:integer;
begin
  s := comm32.input;
  if s > '' then
  begin
   LabelBarcode.Caption:=  s;
//   sendkeys(pchar(s),true);
   if checkbox1.checked then
   begin
    if pos(#10,s) > 0 then delete(s,pos(#10,s),1);
   end;
   if checkbox2.checked then
   begin
    if pos(#13,s) > 0 then delete(s,pos(#13,s),1);
   end;
//   sendkeys(pchar(s),true);
  end;
end;

Unit_Comm.rar

;) B) ;) B) ;) B) ;) B) ;) B) ;) B) ;) B) ;) B)

مشكور أخي في الله الآن انزالت كل الشبهات أمامي

وجزاك الله خير الجزاء عني وعن كل شخص يستخدم هذه الطريقة

أتمنى أن نبقى على اتصال وعنوان ايميلي في الأسفل

ومرة اخرى جزاك الله خيراً

والسلام عليكم ورحمة الله وبركاته