estou usando o print para imprimir notas, duplicatas, e outros pré-impressos, o problema e fazer o alinhamento com o format, faço assim:

Print #Arq2,; Tab(123); (Format(tabela2!qtde * tabela2!valor, "###,##0.00")), só que ele começa a alinhar da esquerda, e a coluna fica toda torta, uma solução, seria preencher com zeros, mas esta fora de cogitação. alguém tem uma luz ?

 

acredito q se vc tirar os parenteses que destacam o comando format exemplo: Format(tabela2!qtde * tabela2!valor, "###,##0.00")

Valeu a intenção, mas não funciona não, o alinhamento começa da esquerda p / a direita, como disse acima.

 

Olá Futura,

 

Você pode usar um dos máetodos mais antigos do BASIC (da época do DOS): o comando RSet. Você deve criar uma máscara dentro da qual será posicionado o seu texto. Veja:

 

Dim Mascara as String

 

Mascara = Space(10)

RSet Mascara = Format(tabela2!qtde * tabela2!valor, "###,##0.00")

 

Depois é só mandar imprimir:

 

Print #Arq2, Tab(123); Mascara

 

Repare que você agora manda imprimir a máscara, que possui dentro dela o valor formatado e alinhado à direita.

 

um abraço,

Sandro.

 

Sandro, aproveito para agradecer também a ajuda que voce deu no crystal, em outro tópico, e ja abusando, voce sabe um jeito ou seja uma rotina, de verificar se a impressora esta on-line, pois os formulários pré-impressos ( notas, cheques, duplicatas, etc), faço tudo pelo print, pois mandando os comandos diretos para a impressora, como se fosse no clipper, a impressão para estes casos fica mais precisa, independente da versão do windows. O unico problema é que se a impressora estiver desligada, o sistema fica travado, esperando a mesma ser ligada, voce tem alguma dica ?

Por que voce nao da uma olhada na secao de dicas.La existe uma rotina que testa se a impressora esta On Line.