USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Alinhar com o Objeto Printer
JDBasic
SIMÃO DIAS
SE - BRASIL
ENUNCIADA !
Postada em 25/07/2005 14:55 hs         
Olá,
Fiz um relatório e estou imprimindo com o objeto printer, o relatório está com a fonte Arial, o problema é que a impressao das colunas codigo e preco saem desalinhadas, gostaria de alinhá-las  a direita.
Algum de você conhece uma maneira de alinha com o objeto Printer sem utilizar a fonte Courrier New, mas com qualquer fonte?

Ex. de como está saindo:

Codigo              Descricao                        Preco
1231                 PRODUTO TESTE              10,00
111                   PRODUTO TESTE              100,00
121                   PRODUTO TESTE              120,00
151                   PRODUTO TESTE              130,00
165                   PRODUTO TESTE              1000,00

Ex. de como eu quero:

Codigo              Descricao                             Preco
1231                 PRODUTO TESTE                  10,00
  111                 PRODUTO TESTE                100,00
  121                 PRODUTO TESTE                120,00
  151                 PRODUTO TESTE                130,00
  165                 PRODUTO TESTE              1000,00

Obrigado.
 
   
Ralph Teixeira
RIO DE JANEIRO
RJ - BRASIL
ENUNCIADA !
Postada em 25/07/2005 17:24 hs            
Faala Simão Blz...
 
No print eu uso assim
 
Format$(campo, "@@@@@@@@@")
 
ele alinha certinho
  12,00
120,00
 
pode testar que funciona
 
T+
 

Ralph Teixeira

   
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
ENUNCIADA !
Postada em 26/07/2005 09:15 hs            
Amigos,
 
Eu nao gosto de usar caracteres pra alinha o printer... prefiro passar as medidas...
 
Vc passa a coordenada onde quer imprimir com CurrentX e CurrentY...
Pra alinha a direita, vc pode fazer assim:
 
'admitindo q X seja a coluna à direita da palavra onde vc quer alinhar...
Printer.CurrentY = Y 'vc deve ter essa variavel controlando as linhas
Printer.CurrentX = X - Printer.TextWidth("o que vc quer imprimir")
Printer.Print "o que vc quer imprimir"
 
Testa ai... eh um pouco mais complicado q com caracteres, mas qdo vc se acostuma, as medidas resolvem um monte de problemas...
 
Ah, antes de iniciar, vc deve escolher a escala de medidas pra usar... eu gosto de usar milimetros... vc deve fazer isso antes de iniciar a impressão:
Printer.ScaleMode = vbMillimeters
 
Espero ter ajudado...


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página