Função CaracterGrafico() |
Esta função tem por objetivo imprimir o caracter gráfico criado.
Exemplo:
' Exemplo em Visual Basic ' DESENHO
' 1 2 3 4 5 6 7 8 9 ' bit 7 = 128 * * ' bit 6 = 064 * * * ' bit 5 = 032 * * * * ' bit 4 = 016 * * * * * ' bit 3 = 008 * * * * * * ' bit 2 = 004 * * * * * * * ' bit 1 = 002 * * * * * * * * ' bit 0 = 001 * * * * * * * * *
' Comando que habilita o modo grafico com 9 pinos (9 colunas) sBuffer = Chr(27) + Chr(94) + Chr(18) + Chr(0) iRetorno = ComandoTX(sBuffer, 4)
' Sequencia de bytes para a montagem do desenho acima sBuffer = Chr(255) + Chr(0) + Chr(0) + Chr(0) + _ Chr(127) + Chr(0) + Chr(0) + Chr(0) + _ Chr(63) + Chr(0) + Chr(0) + Chr(0) + _ Chr(31) + Chr(0) + Chr(0) + Chr(0) + _ Chr(15) + Chr(0) + Chr(0) + Chr(0) + _ Chr(7) + Chr(0) + Chr(0) + Chr(0) + _ Chr(3) + Chr(0) + Chr(0) + Chr(0) + _ Chr(1) + Chr(0) + Chr(0) + Chr(0) + _ Chr(255) + Chr(0) + Chr(0) + Chr(0)
' Descarrega o buffer na impressora. sBuffer = sBuffer + Chr(13) + Chr(10)
' Função CaracterGrafico. iRetorno = CaracterGrafico(sBuffer, Len(sBuffer))
// Exemplo em Delphi { DESENHO
1 2 3 4 5 6 7 8 9 bit 7 = 128 * * bit 6 = 064 * * * bit 5 = 032 * * * * bit 4 = 016 * * * * * bit 3 = 008 * * * * * * bit 2 = 004 * * * * * * * bit 1 = 002 * * * * * * * * bit 0 = 001 * * * * * * * * * } begin // Comando que habilita o modo grafico com 9 pinos (9 colunas) cmd := chr( 27 ) + chr( 94 ) + chr( 18 ) + chr( 0 ); comando := ComandoTX( cmd, Length( cmd ) );
// Sequencia de bytes para a montagem do desenho acima cmd := chr(255) + chr(000) + chr(000) + chr(000) + chr(127) + chr(000) + chr(000) + chr(000) + chr(063) + chr(000) + chr(000) + chr(000) + chr(031) + chr(000) + chr(000) + chr(000) + chr(015) + chr(000) + chr(000) + chr(000) + chr(007) + chr(000) + chr(000) + chr(000) + chr(003) + chr(000) + chr(000) + chr(000) + chr(001) + chr(000) + chr(000) + chr(000) + chr(255) + chr(000) + chr(000) + chr(000);
cmd := cmd + #13 + #10;
// Função CaracterGrafico comando := CaracterGrafico( cmd, length( cmd ) );
end;
O retorno desta função é dado através de um , onde se o retorno for:
1 (um): Sucesso. A função foi executada sem problemas. 0 (zero): Erro ao fechar a porta de comunicação. |