Imprimindo diretamente na impressora

[overload 0]

Olá,

 

Gostaria de saber como imprimir diretamente na impressora (como se fosse ms-dos) eliminando o gerenciador de impressão do windows...

 

Utilizando o modo

 

n = FreeFile()            Open "lpt1:" For Output As #n            Print #n, "E$&A&E$&A&E$&H100&E$&V0100&E$&XMSATO"            Print #n, "E$&H0100&E$&V0200&E$&L0402&E$&XMSATO"            Print #n, "E$&H0100&E$&V0300&E$&L0204&E$&XMSATO"            Print #n, "E$&Q1&E$&Z"            Close #n

não elimina o gerenciador de impressão... <_<

 

gostaria de saber um método de mandar diretamente pra impressora...

 

Abs!

[Graymalkin 0]

Sim, desse jeito você não utiliza o Gerenciador de Impressão. Experimente remover todas as impressoras de lá e veja que você ainda vai conseguir imprimir normalmente com esse código (na maioria das impressoras matriciais). Mas, se você precisa da impressora instalada (para utilizar em outros programas) experimente desmarcar a opção "Spool de trabalhos de impressão do MS-DOS" nas propriedades dela.Abraços,Graymalkin

[wdiegosfreire 0]

bom, estou tentando fazer a mesma coisa, mas não sou mt experiente e não to entendendo mt a estrutura deste código que você postou. será q você poderia dar uma explicação, por cima, sobre este código?Obrigado

[Graymalkin 0]

Um exemplo simples e auto-explicativo ( B) ):

 

n = freefile() 'Obtém um número de arquivo válidoopen "lpt1:" for output as #n 'Abre a porta da impressora como um arquivo de número n? #n, "primeira linha" 'Escreve a primeira linha no "arquivo" (impressora)? #n, "segunda linha" 'Escreve a segunda linha no "arquivo" (impressora)close #n 'Fecha o "arquivo" (impressora) determinando assim o fim da impressão

Experimente aí e veja o resultado.

 

Abraços,

 

Graymalkin