Campo em Impressora Matricial
18/03/2003
0
Ola,
Pessoal da lista to com o maior problema,
To Imprimindo uma nota fiscal em impressora matricial
tá Condensando pulando as linhas corretas
mas no final da nota tem um campo de observação que é
do tipo Memo, o Campo sai no local serto mas quando
a observação tem mais de uma linha depois da diferença
nos campos da nota fiscal seguinte, alguem sabe como devo proceder
nesse caso.
estou tentando montar um contador mas não to conseguindo.
desde ja agradeço a atenção. :(
Wagner.
Pessoal da lista to com o maior problema,
To Imprimindo uma nota fiscal em impressora matricial
tá Condensando pulando as linhas corretas
mas no final da nota tem um campo de observação que é
do tipo Memo, o Campo sai no local serto mas quando
a observação tem mais de uma linha depois da diferença
nos campos da nota fiscal seguinte, alguem sabe como devo proceder
nesse caso.
estou tentando montar um contador mas não to conseguindo.
desde ja agradeço a atenção. :(
Wagner.
Wagnerps
Curtir tópico
+ 0
Responder
Posts
18/03/2003
Anonymous
Tente fazer um contador e na hora de imprimir o campo faça:
for contador := 0 to DBMemo1.Lines.Count - 1 do
begin
WriteLn(Arquivo,DBMemo1.Line[contador].Text;
end;
Vê se essa geringonça funciona, senão me avise.
T+
Segundo me amigo Aurélio a palavra ´serto´ está escrita incorretamente o ideal seria ´certo´.
for contador := 0 to DBMemo1.Lines.Count - 1 do
begin
WriteLn(Arquivo,DBMemo1.Line[contador].Text;
end;
Vê se essa geringonça funciona, senão me avise.
T+
Segundo me amigo Aurélio a palavra ´serto´ está escrita incorretamente o ideal seria ´certo´.
Responder
18/03/2003
Wagnerps
Valeu pela ajuda,
Mas não to usando componentes memo
to lendo o campo no banco de dados e imprimindo direto.
eu precisa identificar o caracter da quebra de linha (#127) para
poder dar o salto correto para a proxima pagina.
Wagner
T+ :)
Mas não to usando componentes memo
to lendo o campo no banco de dados e imprimindo direto.
eu precisa identificar o caracter da quebra de linha (#127) para
poder dar o salto correto para a proxima pagina.
Wagner
T+ :)
Responder
18/03/2003
E_gama
Crie um contador para armazenar quantas linhas seria necessario saltar desde a ultima linha impressa da nota (sem observacao), depois que imprimir a observacao, subtraia o numero de linhas impressas nela e salta o restante das linhas: Exemplo:
Salto := 10; // Saltar 10 linhas
for I := 0 to (MemoObs.Lines.Count - 1) do
begin
WriteLn(Arquivo, MemoObs.Lines.Strings[i]); // Imprime um linha da observacao
Dec(Salto); Decremente o num. de linhas a saltar
end;
// Salto de linhas
while Salto > 0 do
begin
WriteLn(Arquivo, ´´);
end;
Responder
Clique aqui para fazer login e interagir na Comunidade :)
