12-04-2022, 06:23 PM
(آخر تعديل لهذه المشاركة: 12-04-2022, 06:59 PM بواسطة Lam.Abdeldjalil.)
6 طابعة البلوتوث Bluetooth Printer
( إصدارات دلفي الحديثة تحتوي على مكوناتBluetooth )
![[صورة: wokFz5.jpg]](https://imagizer.imageshack.com/img924/6183/wokFz5.jpg)
باختصار للطباعة يجب أن تكون الطابعة مقترنة من قبل paired ولكي يتم الاقتران يجب أن تكتشف discovered
ولكي تكتشف يجب أن يكون البلوتوث مفعل.
و الصلاحيات المطلوبة هي bluetooth و bluetooth administration
وللاتصال بالجهاز يجب ان يكون عندك UUID الخاص بالجهاز وهو يستخدم لتحديد الخدمة التي يقدمها جهاز Bluetooth ، في حالتنا الرقم الخاص بطابعة البلوتوث هو 0001101-0000-1000-8000-00805F9B34FB
بعد الاتصال الطباعة تكون بالكتابة المباشرة مثلا
وبعدها نقوم بإرسال تعليمة esc/pos للرجوع للسطر
https://escpos.readthedocs.io/en/latest/...0a-rel-phx
في النوع المستعمل تمكن الطباعة في الوسط / اليمين بالتعليمات
لكنه لا يدعم العربية
![[صورة: X8mXIn.jpg]](https://imagizer.imageshack.com/img923/9339/X8mXIn.jpg)
![[صورة: giphy.gif]](https://media.giphy.com/media/CUpm0wEycB9Kt3fCWk/giphy.gif)
المثال المرفق خاص يالدلفي فقط
( إصدارات دلفي الحديثة تحتوي على مكوناتBluetooth )
![[صورة: wokFz5.jpg]](https://imagizer.imageshack.com/img924/6183/wokFz5.jpg)
ولكي تكتشف يجب أن يكون البلوتوث مفعل.
و الصلاحيات المطلوبة هي 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/...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]](https://imagizer.imageshack.com/img923/9339/X8mXIn.jpg)
![[صورة: giphy.gif]](https://media.giphy.com/media/CUpm0wEycB9Kt3fCWk/giphy.gif)
المثال المرفق خاص يالدلفي فقط


![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)