Pole display pos

If any one have i litter now about Pole display pos by serial please i need litter help
like how i send the character to pole display

epson?

if so attach to the command prompt via a shell and run:

ECHO Hello world, from Xojo Application>com1

By serial, you will have to “reverse engineer” the terminal protocol if it is already not made available for you…

i use in Vb like

MSComm1.PortOpen = True
MSComm1.Output = Chr(27) + Chr(13)
MSComm1.Output = Chr$(&H5)
MSComm1.Output = Chr$(&HA)
MSComm1.Output = Chr$(&H13)
MSComm1.Output = " "
MSComm1.Output = " "
MSComm1.Output = Chr$(&H13)
MSComm1.Output = "TOTAL SALES " + “$50.00” ’ Displayed Data
MSComm1.Output = Chr$(&HD)
MSComm1.PortOpen = False
and works how i do in Xojo

Have you looked at the Serial class?

If Serial1.Open=True Then
Serial1.Write Chr(27) + Chr(81) + Chr(68) + “ROSE PHARMACY…YOUR ASSURANCE OF…”
Serial1.Write("TOTAL SALES " )
Serial1.Close
End If
but no works
i test in vb and works

i am using usb to serial convert

Try chr (10) in place of chr (13)

Take a look here:
http://forums.realsoftware.com/viewtopic.php?f=1&t=29410

If it’s Epson, you may also want to google “esc pos”. I did some esc pos stuff years ago with real basic.

Hi joseph

CHR HEX
CLR 0C clear display, clear string mode
how you send esc pos on RB/Xojo i have this Command to CLs the screen but no work

Thanks to All Help i get it Working

Serial1.SerialPort=System.SerialPort(“COM1”)

If Serial1.Open=True then
Serial1.Write(CHR(10)+CHR(10)+CHR(27)+ CHR(64)+CHR(10))
//Serial1.Write(CHR(10)+CHR(10)+CHR(48)+CHR(10)+CHR(67)+CHR(10))
Serial1.Write(CHR(10)+CHR(10)+CHR(27)+CHR(48)+CHR(10))
Serial1.Write(“Hello”)
Serial1.Write(CHR(10))
Serial1.Write(CHR(13))
Serial1.Write(“GA POS”)
Serial1.Write(CHR(10))
Serial1.Write(CHR(10)+CHR(10)+CHR(27)+CHR(48)+CHR(10))

Serial1.Close

End If