PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV Mobile 2024 → PCL Printer for WinDev Mobile - which Printer is working ?
PCL Printer for WinDev Mobile - which Printer is working ?
Iniciado por hubert.brandel, nov., 18 2010 12:57 AM - 1 resposta
Membro registado
8 mensagems
Publicado em novembro, 18 2010 - 12:57 AM
I thought that there are only PCL printers for Windows Mobile, so should be easy to print ... but I had to accept, that this is not true. Only Windev Mobile does only support PCL printers.

If it would be possible, just to print without PCL codes (just plain text) i could use my DPP-250 BT. Otherwise it does only accept ESC/POS.

If not, which printer (mobile, thermoprint on rolls etc.) does work ?

sZeile, sGeraet,sRaum, sAblesewert is string
nLenGeraet, nLenRaum, nLenAblesewert is int

nLenGeraet = 10
nLenRaum = 5
nLenAblesewert = 10

IF YesNo("In Datei speichern ?") = Yes THEN
iDestination(iPCL,"\DRUCKDATEI.PCL")
ELSE
Info("Der Bluetoothdrucker muss auf COM1 stehen !")
iDestination(iPCL,"COM1:")
END
iPrint(gsProgFirm1)
iPrint(gsProgFirm2)
iSkipLine()
iPrint(" Zählerablesung "+EDT_FormMI_Ablesedatum)
iSkipLine()
iPrint("LgNr "+gsAnzeig_LGNR)
iPrint(EDT_FormLG_Strasse)
iPrint(EDT_FormLG_PLZ_ORT)
iSkipLine()
iPrint(EDT_FormMI_Wohn1)
iPrint(EDT_FormMI_Wohn2)
iPrint(EDT_FormMI_Name)
iSkipLine()
// Überschrift
sGeraet = Complete("Gerät",nLenGeraet)
sRaum = Complete("Raum",nLenRaum)
sAblesewert = Right(Complete(" ", nLenAblesewert)+"Ablesewert", nLenAblesewert)
sZeile = sGeraet + " " + sRaum + " " + sAblesewert
iPrint(sZeile)
iSkipLine()

iEndPrinting()
Membro registado
8 mensagems
Publicado em novembro, 23 2010 - 10:54 AM
Hi,

it seams to be no problem for others ?

I found a solution for my printing.
Just opend the com port and write on it ...