delphi4arab منتديات دلفي للعرب
التعامل مع عتاد نظام المبيعات POS hardware - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي التقنية (https://delphi4arab.net/forum/forumdisplay.php?fid=6)
+--- قسم : دلفي والتعامل مع الوسائط المتعددة (https://delphi4arab.net/forum/forumdisplay.php?fid=17)
+--- الموضوع : التعامل مع عتاد نظام المبيعات POS hardware (/showthread.php?tid=11878)

الصفحات: 1 2 3

RE: التعامل مع عتاد نظام المبيعات POS hardware - Agmcz - 11-04-2022

(10-04-2022, 11:20 PM)Lam.Abdeldjalil كتب : وعليكم السلام و رحمة الله

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

من بعد إذنك قمت بتعديل هذه المشاركة #6
يبدوا أن المرفقات لا تدعم النوع gif

RE: التعامل مع عتاد نظام المبيعات POS hardware - Lam.Abdeldjalil - 11-04-2022

إقتباس :من بعد إذنك قمت بتعديل هذه المشاركة #6
لا توجد مشكلة Shy 

المنتدى لا يدعم gif/ mp4
أرى نترك الروابط الخارجية و أرفق كل الملفات في ملف مضغوط في أول مشاركة في حال حذفت الروابط الخارجية
----------
لا يمكن رفع ملفات كبيرة في المنتدى لذا سأرفعه في الدرايف

RE: التعامل مع عتاد نظام المبيعات POS hardware - Lam.Abdeldjalil - 12-04-2022

6  طابعة البلوتوث Bluetooth Printer

( إصدارات دلفي الحديثة تحتوي على مكوناتBluetooth )


[صورة: wokFz5.jpg]
باختصار للطباعة يجب أن تكون الطابعة مقترنة من قبل paired ولكي يتم الاقتران يجب أن تكتشف discovered
ولكي تكتشف يجب أن يكون البلوتوث مفعل.
و الصلاحيات المطلوبة هي bluetooth  و  bluetooth administration

وللاتصال بالجهاز يجب ان يكون عندك  UUID الخاص بالجهاز وهو يستخدم لتحديد الخدمة التي يقدمها جهاز Bluetooth ،  في حالتنا الرقم الخاص بطابعة البلوتوث هو 0001101-0000-1000-8000-00805F9B34FB

بعد الاتصال الطباعة تكون بالكتابة المباشرة مثلا
كود :
Fsocket.SendData(TEncoding.UTF8.GetBytes(Edit1.Text));

وبعدها نقوم بإرسال تعليمة esc/pos للرجوع للسطر

https://escpos.readthedocs.io/en/latest/cursor_position.html?highlight=%240A#line-feed-0a-rel-phx

في النوع المستعمل تمكن الطباعة في الوسط / اليمين بالتعليمات

كود :
chrleft = chr($1B) + chr($61) + chr($00);
chrCenter = chr($1B) + chr($61) + chr($01);
chrright = chr($1B) + chr($61) + chr($02);

لكنه لا يدعم العربية
[صورة: X8mXIn.jpg]

[صورة: giphy.gif]

المثال المرفق خاص يالدلفي فقط

RE: التعامل مع عتاد نظام المبيعات POS hardware - S.FATEH - 12-04-2022

السلام عليكم

ممكن معرفة الاخيرة فيما تستخدم اقصد Bluetooth Printer هل هي مثل Thermal Printer

RE: التعامل مع عتاد نظام المبيعات POS hardware - Lam.Abdeldjalil - 12-04-2022

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

نعم هي عبارة عن Thermal Printer بورق أقل حجما ( في طول اللفة 40م بالتقريب ) وفيها بطارية وهي صغيرة يمكن حملها

* مثال عن الاستعمال الداخلي : طباعة أسعار المواد داخل المحل التجاري
* مثال عن الاستعمال الخارجي : موزع مواد التنظيف يطبع طلبية زبونه المحل ن

RE: التعامل مع عتاد نظام المبيعات POS hardware - أبو معاذ - 13-04-2022

السلام عليكم.
جزاك الله خيرا أخي عبد الجليل.
سؤال فقط فيما يخص طباعة الباركود.
كما نعلم أنه يوجد عدة مقاسات للورق الخاص بالباركود ، فكيف نقوم بتهيئة الطباعة ،
أم يجب إرفاق (ملف فاست ريبورت Fr3 ) لكل مقاس؟

RE: التعامل مع عتاد نظام المبيعات POS hardware - Lam.Abdeldjalil - 13-04-2022

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

حفظك الله أخي أبو معاذ .

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

[صورة: MAjv4n.png]

مثال اخفاء كل الصفحات إلا الثانية
كود :
var i: integer;
..
  frxReport1.LoadFromFile('Barcode.fr3');
  for i:=0 to frxReport1.PagesCount-1 do
  begin
    frxReport1.Pages[i].Visible:=false;
  end;
  frxReport1.Pages[2].Visible:=true;
  frxReport1.PrepareReport;
  frxReport1.PrintOptions.Printer := cbbxBarcode.Text;
  frxReport1.PrintOptions.ShowDialog := False;
  frxReport1.ShowReport;


RE: التعامل مع عتاد نظام المبيعات POS hardware - أبو معاذ - 14-04-2022

جزاك الله خير أخي عبد الجليل،
هل ممكن تغيير المقاسات برمجيا؟
أم أن الحل الوحيد ÷و إرفاق لكل مقاس صفحة تقريره الخاصة به؟

RE: التعامل مع عتاد نظام المبيعات POS hardware - Lam.Abdeldjalil - 15-04-2022

السلام عليكم

يمكن التحكم في طول وعرض الصفحة في الفاستريبورت
كود :
  TFrxReportPage(frxReport1.Pages[1]).PaperWidth := 50;
  TFrxReportPage(frxReport1.Pages[1]).PaperHeight := 50;
 

إذا قمت بتغيير الطول و العرض خذ بعين الاعتبار تغيير أحجام وأماكن المكونات داخل التقرير
مكون barcode لا يمكن التحكم بطوله و عرضه إلا بـ zoom
والتغيير في هذا الأخير يمكن أن يؤثر على قراءة الباركود المطبوع ، zoom = 0.8 لا يقرأ من طرف بعض الأنواع . ( جرب Wink )

RE: التعامل مع عتاد نظام المبيعات POS hardware - Man04000 - 22-08-2022

السلام عليكم
اخي Lam.Abdeldjalil ان امكن لو تكمل لنا الميزان الالكتروني
صحيح هو لديه برنامج صغير يقوم بالحساب
لكن اود طريقة لاضافة الميزان الى برنامج مصمم بالدلفي يعني انه في حالة وزن منتج يضع السعر مباشرة فالبرنامج
وشكرا