Alinhar a Direita no XLS.PRG....

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

Alinhar a Direita no XLS.PRG....

Mensagem por scom »

OLA AMIGOS.


EU PEGUEI NA SESSÃO DE CODIGO FONTE O XLS.PRG QUE O ROCHINHA COLOCOU E FICOU MUITO BOM...MAS EU QUERIA SABER SE ALGUEM USA E SABE SE TEM COMO ALINHAR A COLUNA A DIREITA, EM VALORES PORQUE SE NÃO FICA TODO TORTO.

ATENCIOSAMENT

ROBSON
S COM INFORMÁTICA
CLIPPER 5.3 / FIVEWIN 2.0 / BLINKER 7
XHARBOUR/ BCC582
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Tche, pelo clipper acho que não....melhor pra falar a verdade não vi a função do Rochinha...mas no DBF para min fazer isso eu transformo a campo de Numerico para Caracter...e eles vão para direita...isso eu usava para visualizar alguns relatorio no clipper direto no DBF.....é uma alternativa...e vc pode fazer isso no EXCEL...antes de mandar pro EXCEL...grave tudo em CARACTER..

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

obrigado.

Mensagem por scom »

ola Leonardo.


é o seguinte ja ta sendo feito isso: trans(valo,'###,###.##')

mesmo assim obrigado pela atenção.

ROBSON
S COM INFORMÁTICA
CLIPPER 5.3 / FIVEWIN 2.0 / BLINKER 7
XHARBOUR/ BCC582
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Buenas...
é o seguinte ja ta sendo feito isso: trans(valo,'###,###.##')
E assim mesmo esta saindo Torto ? se não esta , eu não entendi sua duvida...

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

isso mesmo leonardo.

Mensagem por scom »

isso mesmo Leonardo.

mesmo assim ta saindo torto. tipo:

Preco
124.00
4.32
27.38
17.82
9.00
14.58
0.00
190.42
46.30
116.51
0.00
10.37
159.48
24.30
108.03

3618.80
S COM INFORMÁTICA
CLIPPER 5.3 / FIVEWIN 2.0 / BLINKER 7
XHARBOUR/ BCC582
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Tche, veja soh ....vc jah tentou passar para um outra DBF com campo caracter antes de mandar para o XLS....sem usar o TRANS()....e usar o STR() para gravar o numero no campo caracter ??

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

não.

Mensagem por scom »

Leonardo....não tentei. vou tentar.

vamos ver o que da ai posto o resultado...ok

Robson
S COM INFORMÁTICA
CLIPPER 5.3 / FIVEWIN 2.0 / BLINKER 7
XHARBOUR/ BCC582
scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

Agora sim.

Mensagem por scom »

Leonardo usando a lógica da idéia que vc me deu fiz assim:

XPREC = STR(PREC,10,2)
XPREC = SPACE(10-LEN(ALLTRIM(XPREC)))+XPREC

xlsWrite( nXls, f, 6, XPREC )

Ai Ficou Perfeito. alinhado a direita.


Valeu Muito obrigado.

Até a Proxima

ROBSON
S COM INFORMÁTICA
CLIPPER 5.3 / FIVEWIN 2.0 / BLINKER 7
XHARBOUR/ BCC582
Avatar do usuário
Eolo
Colaborador
Colaborador
Mensagens: 1134
Registrado em: 08 Dez 2005 18:24
Localização: São Paulo - SP

Mensagem por Eolo »

Robson,

Pra facilitar, use a função PAD() e suas variantes... Elas adicionam brancos à esquerda ou à direita (ou em ambos os lados) de uma string:

Código: Selecionar todos

?PADL("robson",16) -> "          robson"
?PADR("robson",16) -> "robson          " // igual à PAD()
?PADC("robson",16) -> "     robson     "
Editado pela última vez por Eolo em 01 Jun 2007 11:52, em um total de 1 vez.
scom
Usuário Nível 3
Usuário Nível 3
Mensagens: 133
Registrado em: 15 Nov 2004 10:49
Localização: Dourados/MS

OBRIGADO.

Mensagem por scom »

Muito obrigado EOLO..Pela Dica.

Valeu..

ROBSON
S COM INFORMÁTICA
CLIPPER 5.3 / FIVEWIN 2.0 / BLINKER 7
XHARBOUR/ BCC582
Responder