|
PROFESSIONAL NEWSGROUPS WINDEV, WEBDEV and WINDEV Mobile |
| | | | | |
WM Imprimir Mobile - Print From Mobile |
Started by Willian Fernando, Jun., 28 2016 11:18 PM - 16 replies |
| |
| | | |
|
| |
Registered member 123 messages Popularité : +46 (46 votes) |
|
Posted on June, 28 2016 - 11:18 PM |
1 - Procedimento para Conectar/Desconectar 1 - Procedimiento para Conectar/Desconectar 1 - Procedure to Connect and Disconnect
Procedure PRINT_ConnectarDesconectar(s_nombreDispositivo is string,b_conectarDesconectar is boolean = True , s_socketNombre is string = "") WHEN EXCEPTION IN IF b_conectarDesconectar = True THEN s_listaDeDispositivos is string s_dispositivo is string s_idDispositivo is string s_mACAddress is string s_listaDeDispositivos = BTListDevice(btSimpleList) b_conectado is boolean = False FOR EACH STRING s_dispositivo OF s_listaDeDispositivos SEPARATED by CR s_idDispositivo = ExtractString(s_dispositivo, 1) s_mACAddress = ExtractString(s_dispositivo, 2) IF s_nombreDispositivo = BTInfoDevice(s_idDispositivo, btName) THEN b_conectado = True BREAK END END IF b_conectado THEN s_sock is string s_sock = "SOCK"+s_mACAddress IF NOT SocketConnectBluetooth(s_sock,"SerialPortServiceClass_UUID",s_mACAddress,15000) THEN RESULT "No se Pudo Conectar a la Impresora " + ErrorInfo() ELSE SocketChangeTransmissionMode(s_sock,SocketEndTag,CRLF) RESULT s_sock END ELSE RESULT "No Se Encontro Dispositivo" END ELSE IF SocketClose(s_socketNombre) THEN RESULT "" ELSE RESULT "Error "+ErrorInfo() END END DO RESULT "Error Exception "+ExceptionInfo() END
2 - Procedimento para Enviar Impresão 2 - Procedimiento para Enviar la Impresion 2 - Procedure to Send to Printer
Procedure PRINT_Imprimir(s_nombreSocket is string , s_texto is string) IF NOT SocketWrite(s_nombreSocket,s_texto) THEN Info("Error al Enviar Impresion"+ErrorInfo()) RESULT False ELSE RESULT True END
Exemplo de como utilizar Ejemplo de como utilizar Example of using
s_socketImpresora is string s_socketImpresora = PRINT_ConnectarDesconectar("MPD2",True,"") IF Left(s_socketImpresora,4) = "SOCK" THEN PRINT_Imprimir(s_socketImpresora,"HOLA MUNDO Con Windev Mobile") PRINT_ConnectarDesconectar("",False,s_socketImpresora) ELSE Info(s_socketImpresora) END
Bom Proveito
-- Atte. Willian Fernando |
| |
| |
| | | |
|
| | |
| |
Registered member 3,655 messages Popularité : +175 (223 votes) |
|
Posted on June, 29 2016 - 12:47 AM |
Parabéns Willian!
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 9949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | |
| |
Registered member 123 messages Popularité : +46 (46 votes) |
|
Posted on June, 29 2016 - 4:55 PM |
| |
| |
| | | |
|
| | |
| |
Registered member 123 messages Popularité : +46 (46 votes) |
|
Posted on October, 19 2016 - 6:12 PM |
| |
| |
| | | |
|
| | |
| |
Posted on December, 01 2016 - 2:24 PM |
Hola William, me puedes contactar por skype ? mi skype es avancys o por whatsapp al +57 318 350 44 91 Estuve probando tu codigo pero no me conecta la impresora ? Saludos, Manuel from Colombia |
| |
| |
| | | |
|
| | |
| |
Registered member 123 messages Popularité : +46 (46 votes) |
|
Posted on December, 02 2016 - 6:43 PM |
Manuel hay varias coincidencias
agregame willan_fer@hotmail.com (Skype)
-- Atte. Willian Fernando |
| |
| |
| | | |
|
| | |
| |
Registered member 217 messages Popularité : +12 (12 votes) |
|
Posted on December, 29 2016 - 11:58 PM |
Hi everybody, Thank you very much for this job Willian Fernando and for sharint it with us.
I'm wondering something.
The code you gave works only with a specific model of a printer ? Can it be adapted to some other models of printer ? |
| |
| |
| | | |
|
| | |
| |
Registered member 123 messages Popularité : +46 (46 votes) |
|
Posted on January, 03 2017 - 6:34 PM |
In Theory should work with almost all Bluethoot models that print by SOCKET
Monsieur RÉDA a écrit :
Hi everybody, Thank you very much for this job Willian Fernando and for sharint it with us.
I'm wondering something.
The code you gave works only with a specific model of a printer ? Can it be adapted to some other models of printer ?
-- Atte. Willian Fernando |
| |
| |
| | | |
|
| | |
| |
Registered member 217 messages Popularité : +12 (12 votes) |
|
Posted on January, 03 2017 - 10:04 PM |
Thank you very much Willian Fernando. I have just tried to print with SEWOO LK-P31, it worked! It's a very good work you shared with us. Thanks again ! |
| |
| |
| | | |
|
| | |
| |
Registered member 3,655 messages Popularité : +175 (223 votes) |
|
Posted on January, 11 2017 - 4:16 PM |
Monsieur RÉDA, If you can do something else, please share with us!
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 9949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | |
| |
Registered member 217 messages Popularité : +12 (12 votes) |
|
Posted on January, 12 2017 - 2:18 PM |
Hi, The procedures that Fernando shared with us are ready to be directly used. I did not do anything more If i do something more, i ll not hesitate to share it. |
| |
| |
| | | |
|
| | |
| |
Registered member 123 messages Popularité : +46 (46 votes) |
|
Posted on January, 13 2017 - 6:54 PM |
Perfect
Monsieur RÉDA a écrit :
Hi, The procedures that Fernando shared with us are ready to be directly used. I did not do anything more If i do something more, i ll not hesitate to share it.
-- Atte. Willian Fernando |
| |
| |
| | | |
|
| | |
| |
Posted on January, 16 2017 - 6:37 PM |
Caros, graças ao exemplo acima hj consigo imprimir via BT de um tablet android para uma impressora URANO ZP220. Ainda não consigo negrito, imagem ou etc. Mas por agora esta ok. Preciso que no final de cada impressão a impressora acione a guilhotina, pedi ao fabricante que me envia-se o comando e tive a seguinte resposta:
**************Reposta do fabricante************************* Boa tarde,
envie o comando hex 1B 69
Atenciosamente,
Fábio Bica ************************************************************** Com windev mobile, como eu passaria este comando para impressora?
Marcos Roberto. |
| |
| |
| | | |
|
| | |
| |
Registered member 11 messages Popularité : +2 (2 votes) |
|
Posted on January, 16 2017 - 6:38 PM |
Caros, graças ao exemplo acima hj consigo imprimir via BT de um tablet android para uma impressora URANO ZP220. Ainda não consigo negrito, imagem ou etc. Mas por agora esta ok. Preciso que no final de cada impressão a impressora acione a guilhotina, pedi ao fabricante que me envia-se o comando e tive a seguinte resposta:
**************Reposta do fabricante************************* Boa tarde,
envie o comando hex 1B 69
Atenciosamente,
Fábio Bica ************************************************************** Com windev mobile, como eu passaria este comando para impressora?
Marcos Roberto. |
| |
| |
| | | |
|
| | |
| |
Posted on January, 06 2018 - 9:58 AM |
Buenos dÃas Willian.
Muchas gracias por este código; me ha servido muchÃsimo.
Tengo una pregunta ¿cómo se puede hacer para imprimir un tipo de fuente especÃfico, por ejemplo Arial, Times New Roman, etc? ¿TendrÃas un ejemplo?
Te agradecerÃa mucho la ayuda, ya que estoy desarrollando una app que imprime en una impresora bluetooth y tengo que cambiar el tipo de fuente.
Gracias de antemano. |
| |
| |
| | | |
|
| | |
| |
Registered member 123 messages Popularité : +46 (46 votes) |
|
Posted on January, 12 2018 - 8:50 PM |
Eso depende de la impresora, pero es muy probable que no se pueda, verifique con el proveedor si la misma posee soporte para imprimir otro tipo de fuente (normalmente nó), y si asà fuera con el codigo que puse de ejemplo no seria posible ya que solo se envia TEXTO y nada mas
-- Atte. Willian Fernando |
| |
| |
| | | |
|
| | |
| |
Registered member 217 messages Popularité : +12 (12 votes) |
|
Posted on April, 23 2018 - 1:40 PM |
Good Morning, Do you think, it is possible to print Bar Code or QRCode with this printer using Socket ?
Thank you in advance.
Réda |
| |
| |
| | | |
|
| | | | |
| | |
| | |
| |
|
|
|