Quebra mais de uma linha campo InfAdic.infCpl

[marcelo_sp]

Boa tarde 

Tentei implementar uma quebra de linha no campo InfAdic.infCpl com ';' , mas não obtive o resultado esperado , eu desejava pular mais que uma linha deixando uma linha em branco para a questão de um layout com melhor visualização mas não tinha sucesso informando duas vezes = ';;'  . 

Informando ';' ou ';;;;;;' na frente das Strings enviada ele quebra apenas uma única linha , percebi que existe uma função QuebraLinhas(...)  que é a causa do problema , no caso implementei o ';' na chamada e resolveu .

Se puderem avaliarem por gentileza .

Para facilitar é na linha 502 da unit em anexo .

Obrigado .

 

ACBrSATExtratoESCPOS.pas

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

[EMBarbosa]

Em 09/03/2020 at 14:44, marcelo_sp disse:

Boa tarde 

Tentei implementar uma quebra de linha no campo InfAdic.infCpl com ';' , mas não obtive o resultado esperado , eu desejava pular mais que uma linha deixando uma linha em branco para a questão de um layout com melhor visualização mas não tinha sucesso informando duas vezes = ';;'  . 

Informando ';' ou ';;;;;;' na frente das Strings enviada ele quebra apenas uma única linha , percebi que existe uma função QuebraLinhas(...)  que é a causa do problema , no caso implementei o ';' na chamada e resolveu .

Se puderem avaliarem por gentileza .

Para facilitar é na linha 502 da unit em anexo .

Obrigado .

 

ACBrSATExtratoESCPOS.pas 30 kB · 2 downloads

Agradecemos a contribuição. 

Infelizmente a alteração quebra o layout de quem não usa a quebra de linha como você descreveu, adicionando espaços no início das linhas.

Para implementar essa funcionalidade, precisamos de outra estratégia.

Por exemplo, podemos tratar as strings antes ou depois de terem sido enviadas a função QuebraLinhas. Outra opção seria usar uma outra função que aceitasse essa funcionalidade.