Configurar fonte da LX-300

Delphi

18/05/2005

Bom dia a todos.

Preciso configurar a fonte da impressora para Draft Condensed em tempo de execução e depois voltar para a fonte Draft.

Gostaria de saber qual o código da fonte Draft e Draft Condensed. Se alguém tiver um manual das fontes, e puder me passar eu agradeceria muito.

Grato pela atenção.


Turbo Drive

Turbo Drive

Curtidas 0

Respostas

Vinicius2k

Vinicius2k

18/05/2005

Colega,

{ Controle de caracteres }
EscDraft          = #27+´x´+´0´;    // Modo Draft
EscNLQ            = 27+´x´+´1´;    // Modo NLQ
EscNLQRoman       = 27+´k´+´0´;    // Fonte NLQ "Roman"
EscNLQSansSerif   = 27+´k´+´1´;    // Fonte NLQ "SansSerif"
Esc10cpp          = 27+´P´;        // Espaçamento horizontal em 10cpp
Esc12cpp          = 27+´M´;        // Espaçamento horizontal em 12cpp
EscCondensedOn    = 15;            // Ativa o modo condensado
EscCondensedOff   = 18;            // Desativa o modo condensado
EscLargeOn        = 27+´W´+´1´;    // Ativa o modo expandido
EscLargeOff       = 27+´W´+´0´;    // Desativa o modo expandido
EscBoldOn         = 27+´E´;        // Ativa o modo negrito
EscBoldOff        = 27+´F´;        // Desativa o modo negrito
EscItalicOn       = 27+´4´;        // Ativa o modo itálico
EscItalicOff      = #27+´5´;        // Desativa o modo itálico
EscUnderlineOn    = 27+´-´+´1´;    // Ativa o modo sublinhado
EscUnderlineOff   = 27+´-´+´0´;    // Desativa o modo sublinhado
EscDblStrikeOn    = 27+´G´;        // Ativa o modo de passada dupla
EscDblStrikeOff   = 27+´H´;        // Desativa o modo de passada dupla
EscSupScriptOn    = 27+´S1´;       // Ativa o modo sobrescrito
EscSubScriptOn    = 27+´S0´;       // Ativa o modo subescrito
EscScriptOff      = 27+´T´;        // Desativa os modos sobrescrito e subescrito
{ Controle de página }
Esc6lpp           = 27+´2´;        // Espaçamento vertical de 6 linhas por polegada
Esc8lpp           = 27+´0´;        // Espaçamento vertical de 8 linhas por polegada
EscMarginLeft     = 27+´l´+?;      // Margem esquerda, onde "?" = Margem
EscMarginRight    = 27+´Q´+?;      // Margem direita, onde "?" = Margem
EscPaperSize      = #27+´C´+?;      // Tamanho da página, onde "?" = Linhas
EscAutoNewPageOn  = 27+´N´+?;      // Ativa o salto sobre o picote, onde "?" = Linhas
EscAutoNewPageOff = 27+´O´;        // Desativa o salto sobre o picote
{ Controle da impressora }
EscReset          = 27+´@´;        // Inicializa a impressora (Reset)
EscLF             = 10;            // Avança uma linha
EscFF             = 12;            // Avança uma página
EscCR             = 13;            // Retorno do carro


T+


GOSTEI 0
Turbo Drive

Turbo Drive

18/05/2005

Irmãozinho muito massa mesmo. Valeu :P :P :P :P :P :P


GOSTEI 0
Fsflorencio

Fsflorencio

18/05/2005

Vinícius,
Estes comandos são padrão para quais modelos de impressora?


GOSTEI 0
Vinicius2k

Vinicius2k

18/05/2005

Vinícius, Estes comandos são padrão para quais modelos de impressora?

Olá !
Todas as matriciais que trabalhem com o padrão Epson ESC/P e/ou ESC/P 2.
Algumas impressoras implementam outros comandos como o espaçamento vertical de 7/72´ (ESC+´1´ ou #49), como a LX-300, mas esta listagem é genérica, podendo ser utilizada em qualquer impressora que obedeça o padrão Epson.


GOSTEI 0
Glayson Silva

Glayson Silva

18/05/2005

Amigo estou usando o canvas para fazer a impressao direta na impressora lx-300. Como passar esses comandos que você citou??? Abraços
GOSTEI 0
POSTAR