Imprimir letras maiores na LX-300

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Marcio Antonio Ril
Usuário Nível 1
Usuário Nível 1
Mensagens: 42
Registrado em: 13 Set 2005 11:55

Imprimir letras maiores na LX-300

Mensagem por Marcio Antonio Ril »

Amigos, estou com duvidas, o que preciso mudar nesse codigo para imprimir letras grandes para o titulo do relatorio....

@ LIN, 01 SAY " RIO BRANCO MATERIAIS DE CONSTRUCAO "

Obrigado,

Marcio Ril
Avatar do usuário
kiko
Usuário Nível 3
Usuário Nível 3
Mensagens: 145
Registrado em: 08 Jul 2004 15:24
Localização: Cianorte

Mensagem por kiko »

letra grande como?
se for letra expandida, ou seja, mais larga, mande para a impressora CHR(14)
isso ativa a expansao em uma linha na impressao...vai sair o dobro do tamanho normal
agora, se a letra grande que vc quer eh uma letra mais alta, nao sei se da pra fazer...
eh isso aew...
[z]
Marcio Antonio Ril
Usuário Nível 1
Usuário Nível 1
Mensagens: 42
Registrado em: 13 Set 2005 11:55

Como ficaria entaum

Mensagem por Marcio Antonio Ril »

Kiko, acho que é isso mesmo...
mais como ficaria.
@ LIN, 01 SAY " RIO BRANCO MATERIAIS DE CONSTRUCAO "


MArcio Ril
Avatar do usuário
kiko
Usuário Nível 3
Usuário Nível 3
Mensagens: 145
Registrado em: 08 Jul 2004 15:24
Localização: Cianorte

Mensagem por kiko »

naum naum naum
ficaria assim:

Código: Selecionar todos

@ prow()+01,00 say CHR(14)+"RIO BRANCO MATERIAIS DE CONSTRUCAO"
veja bem que isso expande apenas a linha atual...para expandir as linhas abaixo, vc precisa enviar o CHR(14) novamente
Marcio Antonio Ril
Usuário Nível 1
Usuário Nível 1
Mensagens: 42
Registrado em: 13 Set 2005 11:55

E negritar.....

Mensagem por Marcio Antonio Ril »

E para colocar em negrityo......

Marcio Ril
evaldo
Usuário Nível 3
Usuário Nível 3
Mensagens: 113
Registrado em: 27 Out 2005 23:29

Mensagem por evaldo »

? CHR(14)+'1234567890 modo 60 CPL'
? CHR(15)+'1234567890 MODO CONDENSADO 140 CPL'
? chr(18)+'1234567890 NORMAL'
? CHR(16)+'1234567890 MODO CONDENSADO 120 CPL'
? CHR(17)+'1234567890 MODO CONDENSADO 96 CPL'
? CHR(20)+'1234567890 MODO CONDENSADO 160 CPL'
? chr(18)+'1234567890 MODO NORMAL 80 CPL'
? CHR(19)+'1234567890 MODO NORMAL NEGRITO'
? chr(19)+chr(18)+'1234567890 NORMAL'
Marcio Antonio Ril
Usuário Nível 1
Usuário Nível 1
Mensagens: 42
Registrado em: 13 Set 2005 11:55

Estou te enxendo heim.... mais só mais uma

Mensagem por Marcio Antonio Ril »

E quando for para imprimir uma variavel, exemplo:

@ prow()+01,00 say CHR(14)+WTOTA_LIQUIDO PICT "@E 99,999.99".

Marcio
Avatar do usuário
kiko
Usuário Nível 3
Usuário Nível 3
Mensagens: 145
Registrado em: 08 Jul 2004 15:24
Localização: Cianorte

Mensagem por kiko »

marcio...esse ultimo ai jah nao eh mais problema com impressora...eh a forma que vc ta concatenando os caracteres...
tenta colocar assim

Código: Selecionar todos

@ prow()+01,00 say CHR(14)+TRANSFORM(WTOTA_LIQUIDO,"@E 99,999.99")+"."
franciscomorade
Usuário Nível 1
Usuário Nível 1
Mensagens: 1
Registrado em: 11 Mai 2011 10:49
Localização: São Paulo - SP

Imprimir letras maiores na LX-300

Mensagem por franciscomorade »

Ótima dica, porem já havia resolvido, mesmo assim, Obrigado, por mais que a dica foi pro outro colegá! :D
Responder