Extenso em duas linhas
Estou usando a função extendo para converter valores para extendo, mas estou imprimindo em uma impressora de 40 colunas, então preciso de fazer a quebra de linha.
Até ai não tem problema, mas como quebrar em um local da String que contem espaço e não caracter. Existe alguma funcção pronta ou tenho de fazer via programação
Nilson
T+
D7 + FB 1.5 + Dbexpress
Até ai não tem problema, mas como quebrar em um local da String que contem espaço e não caracter. Existe alguma funcção pronta ou tenho de fazer via programação
Nilson
T+
D7 + FB 1.5 + Dbexpress
Nilson Jr
Curtidas 0
Respostas
Fer_nanda
06/05/2004
:arrow: http://delphiforum.icft.com.br/forum/viewtopic.php?t=43243
GOSTEI 0
Nigro
06/05/2004
Faz com a função Copy()
GOSTEI 0
Omar Cury
06/05/2004
faça +/- assun :
crie duas variaveis string. ex:
sExtenso1 : String;
sExtenso2 : String;
e faça um copy com ele...
sExtenso1 := Copy(NomeDaFuncao,1,40)
sExtenso2 := Copy(NomedaFuncao,41,80)
em seguida, é só imprimir o sExtenso2 na linha abaixo da sExtenso1
abraço
crie duas variaveis string. ex:
sExtenso1 : String;
sExtenso2 : String;
e faça um copy com ele...
sExtenso1 := Copy(NomeDaFuncao,1,40)
sExtenso2 := Copy(NomedaFuncao,41,80)
em seguida, é só imprimir o sExtenso2 na linha abaixo da sExtenso1
abraço
GOSTEI 0
Einstein
06/05/2004
exite o componente RDExtenso que faz isso ele é pago visite www.deltrees.com.br. manda e-mail se quizer uma cópia.
GOSTEI 0