B4A Library SD: BT Printer Bluetooth

Star-Dust · Nov 4, 2017

ANNOUNCEMENT
Starting today, this library will be abandoned and will no longer be distributed.
A new, more comprehensive Android library for ESC/POS thermal printers will be released. (BT, BLE, LAN, USB) (here)

(No WRAP, No Java Only B4A)
BT_Printer library allows you to print text and image to a
thermal printers (Bluetooth and BLE) with ESC/POS language
(For B4J versione see Here, for B4i versione see Here, for ZEBRA printer Here)

To print the QR CODES with your BT thermal printer you can create an image containing the QR code with the help of the @Erel library (here) or can use library of @Johan Schoeman (here)

WARNING: Make sure the library meets all your needs, is compatible with the printer you need to use.
To try print with the demo version (rel. 0.21) you can only use the FlushAndClose command which lasts 14 days and then disables.
The full version of the library will be issued to those making a donation (Contact me in private before making a donation). In the donation indicate the library you want and your NickName. Those requesting the full version will receive updates for 3 months.

SD_BT_Printer

Author: Star-Dust
Version: 1.00

BLE_Printer
- Events:
  - Connected (services As List)
  - Disconnected
  - ImageWriteComplete
  - PrinterFound (Name As String, ID As String)
  - StateChanged (msg As String)
  - WriteComplete (Characteristic As String, Success As Boolean)
- Fields:
  - CharatteristicName As String
  - currentState As Int
  - ServiceName As String
- Functions:
  - AddTab (ArrayTab As Int()) As String
    Add Tab
    eg. PrinterBLE.AddTab(Array As Byte(100,150,121))
  - CenterJustify As String
    after this command calls SendBufferToPrinter
  - Class_Globals As String
  - Connect (ID As String) As String
  - Initialize (CallBack As Object, EventName As String, EncodingType As String) As String
    Initializes the object. You can add parameters to this method if needed.
  - InitializePrinter As String
  - IsInitialized As Boolean
    Verifica se l'oggetto sia stato inizializzato.
  - LeftJustify As String
    after this command calls SendBufferToPrinter
  - PrintBitmap (bmp As Bitmap)
  - RightJustify As String
    after this command calls SendBufferToPrinter
  - ScanPrinter As String
  - SetCodePage (Code As Byte) As String
    es. Printer.SetCodePage(06) for umlauts char
  - Write (Text As String) As String
    Write (Print) a Text
  - Write_ArrayByte (B As Byte()) As String
    Write (Send to Printer) a Array of Byte
    eg. PrinterBLE.Write_ArrayByte(Array As Byte(0x1D,150,23))
    eg. PrinterBLE.Write_ArrayByte("Text".GetBytes("UTF8"))
  - WriteBarCode (Code As String) As String
  - WriteLine (Text As String) As String
    Write (Print) a Text + CHLF
  - WriteList (list As List) As String
    Write (Print) a List
- Properties:
  - CodeTable
    es. printer.setCodeTable(Ecoding.Code_WPC1252)
    aftet this command calls SendBufferToPrinter
  - isConnect As Boolean [read only]
  - isScanning As Boolean [read only]
  - Spacing
    after setSpacing command calls SendBufferToPrinter
BT_Printer
Note: AddPermission(android.permission.ACCESS_COARSE_LOCATION)
- Events:
  - BluetoothIsDisabled
  - ConnectedToPrint (Success As Boolean)
  - DataReceived (Buffer() As Byte)
  - DisconnectToPrint (Mac As String)
  - DiscoveryComplete (Printers As Map)
  - DiscoveryFinished
  - DiscoveryNewPrinter (PrintedFound As Map, DeviceClass As Int)
  - DiscoveryNoDeviceFound
  - ErrorDiscovery
  - ListPrinterAssociated (ListNameAndMac As Map)
  - SendingError (Mac As String)
  - SendTerminated
- Fields:
  - Const_AUDIO_VIDEO As Int
  - Const_COMPUTER As Int
  - Const_HEALTH As Int
  - Const_IMAGING As Int
  - Const_MISC As Int
  - Const_NETWORKING As Int
  - Const_PERIPHERAL As Int
  - Const_PHONE As Int
  - Const_TOY As Int
  - Const_UNCATEGORIZED As Int
  - Const_WEARABLE As Int
- Functions:
  - AddBuffer_ArrayByte (B As Byte()) As String
  - AddBuffer_BarCode (Code As String) As String
  - AddBuffer_Bitmap (Bmp As Bitmap, ShiftLeft As Int) As String
  - AddBuffer_BitmapAlternativeCoding (Bmp As Bitmap) As String
  - AddBuffer_List_Write (list As List) As String
  - AddBuffer_List_WriteLine (list As List) As String
  - AddBuffer_Tab (ArrayTab As Int()) As String
  - AddBuffer_Write (Text As String) As String
  - AddBuffer_WriteLine (Text As String) As String
  - AddPrintDefineImage As String
  - CenterJustify As String
    after this command calls SendBufferToPrinter
  - ChangeEncoding (EncodingType As String) As String
  - Class_Globals As String
  - ClearBuffer As String
  - Close As String
  - Connected As Boolean
  - DefineImage (Image As Bitmap)
  - flushAllAndClose
  - Initialize (CallBack As Object, EventName As String, EncodingType As String) As String
    Initializes the object. You can add parameters to this method if needed.
  - InitializePrinter As String
  - IsInitialized As Boolean
    Verifica se l'oggetto sia stato inizializzato.
  - LeftJustify As String
    after this command calls SendBufferToPrinter
  - Preview As Bitmap
  - ResetPreViewWidth (NewWidth As Int) As String
  - RightJustify As String
    after this command calls SendBufferToPrinter
  - SearchNewPrinter As String
    select --------------------------------------------
  - SelectFromAssociatedPrinter As String
  - SelectFromMac (Mac As String) As String
  - SendBufferToPrinter
  - SetCodePage (Code As Byte) As String
    es. Printer.SetCodePage(06) for umlauts char
- Properties:
  - CodeTable
    es. printer.setCodeTable(Ecoding.Code_WPC1252)
    aftet this command calls SendBufferToPrinter
  - Spacing
    after setSpacing command calls SendBufferToPrinter
ESC_POS
Code module
Subs in this code module will be accessible from all modules.
- Fields:
  - BoldOff As String
  - BoldOn As String
  - DoubleOff As String
  - DoubleOn As String
  - FontA_Bold As String
  - FontA_DoubleHight As String
  - FontA_DoubleWide As String
  - FontA_DoubleWideHeight As String
  - FontA_Normal As String
  - FontB_Bold As String
  - FontB_DoubleHeight As String
  - FontB_DoubleWide As String
  - FontB_DoubleWideHeight As String
  - FontB_Normal As String
  - Horizzontal As String
  - InitializePrinter As String
  - ItalicFontOff As String
  - ItalicFontOn As String
  - NoUnderline As String
  - QueryErrorCauses As String
  - QueryOfflineCauses As String
  - QueryPaperStatus As String
  - QueryPrinterStatus As String
  - Underline1 As String
  - Underline2 As String
  - Vertical As String
- Functions:
  - Process_Globals As String
Encoding
Code module
Subs in this code module will be accessible from all modules.
- Fields:
  - Chinese As String
  - ChineseS As String
  - Code_PC437 As Int
  - Code_PC850 As Int
  - Code_PC857 As Int
  - Code_PC858 As Int
  - Code_PC860 As Int
  - Code_PC863 As Int
  - Code_WPC1252 As Int
  - DOS_Latin_1 As String
  - IBM_PC As String
  - ISO8859 As String
  - UTF8 As String
  - Windows1252 As String
- Functions:
  - Process_Globals As String

aviario · Jan 10, 2018

Hello, I tested your library with an Intermec Pr3 printer and it does not print the bitmap

Thank

Star-Dust · Jan 10, 2018

There are 2 methods of printing. The former is compatible with most printers. The second with some models.

Try both. There is a third method, but I still have to experiment with it, and it is not included in the library

aviario · Jan 12, 2018

I have used both methods and it does not print

Thank you

Star-Dust · Jan 12, 2018

I'm sorry. On the forum you will find many similar libraries for Bluetooth, try them and see the compatible one for your printer.

rkmoray · May 15, 2018

I am trying you lib on a bt printer,but cannot figure out how to cut the paper after the printing is complete

Star-Dust · May 15, 2018

rkmoray said:
I am trying you lib on a bt printer,but cannot figure out how to cut the paper after the printing is complete

You need to know the command for cutting the paper. I do not know if it is the same for all printers

rkmoray · May 15, 2018

According to the document for the printer,
"• Paper cut by GS V m n."

but I do not know how to convert that to run with your library.

Star-Dust · May 15, 2018

rkmoray said:
According to the document for the printer,
"• Paper cut by GS V m n."

but I do not know how to convert that to run with your library.

Tomorrow I'll take a look and let you know

rkmoray · May 15, 2018

?????

Star-Dust · May 15, 2018

try this

B4X:

PrinterBT.AddBuffer_ArrayByte(Array As Byte(29,86,0,48))

or

B4X:

Dim N as int = 10 ' n × vertical motion unit
PrinterBT.AddBuffer_ArrayByte(Array As Byte(29,86,65,n))

rkmoray · May 16, 2018

Thank you for the conversion. Unfortunately neither of them cut the paper as needed.
Any other ideas would be appreciated

Star-Dust · May 16, 2018

Try adding a zero after the command

PrinterBT.AddBuffer_ArrayByte(Array As Byte(29,86,0,48,0))

rkmoray · May 16, 2018

So there is no misunderstanding, this is what my code is, and it still does not cut the paper.

B4X:

Stampa.Initialize(Me,"Stampa",Encoding.Windows1252)
Stampa.AddBuffer_Writeline("How are you?")
Stampa.AddBuffer_ArrayByte(Array As Byte(29,86,0,48,0))
Stampa.SendAllAndClose

Star-Dust · May 16, 2018

GS V m n
29=GS, 86 = V, m=56, n= (any number)

rkmoray · May 16, 2018

I changed the arraybyte to read
Stampa.AddBuffer_ArrayByte(Array As Byte(29,86,56,10))
but it still does not cut.

Star-Dust · May 16, 2018

You need to find the right code for your printer, and sometimes the commands close with zero

rkmoray · May 16, 2018

according to https://www.rapidtables.com/convert/number/ascii-hex-bin-dec-converter.html, the conversion should be
GS:29 V:86 m:109 n:110
which means my bytearray should be
Stampa.AddBuffer_ArrayByte(Array As Byte(29,86,109,110))
is that correct, also should ther ebe a spce(20) in between each char (29,20,86,20,109,20,110)

Star-Dust · May 16, 2018

Is right,but no space. N = vertical motion

B4X:

Dim N as int = 10 ' n × vertical motion unit
PrinterBT.AddBuffer_ArrayByte(Array As Byte(29,86,65,n))

rkmoray · May 16, 2018

I appreciate all the help you are giving me,and if this ever completely works, there is a pot of coffee ion it for you, not just a cup.

I have the line

B4X:

        PrintBuffer=ESC_POS.BoldOn  & ESC_POS.FontA_Bold &  ESC_JUSTIFY_LEFT & TicketCatName   & ESC_JUSTIFY_RIGHT & SellingPrice
        Starter.Printer.WriteLine(PrintBuffer)

What I am trying to do is have the first variable (TicketCatName ) on the left justified and the second variable(SellingPrice) Right justified

But what I get is basically both variables printer as if it were concatenated.

vecino · Jun 19, 2018

Hi, I am testing your library and I see that there is no example Send_Buffer_to_Print_flush.
It's a mistake?
Regards.

B4A Library SD: BT Printer Bluetooth

Attachments

Active Member

Expert

Active Member

Expert

Active Member

Expert

Active Member

Expert

Active Member

Expert

Active Member

Expert

Active Member

Expert

Active Member

Expert

Active Member

Expert

Active Member

Well-Known Member

Similar Threads

Privacy & Transparency

Privacy & Transparency