Keyo
|
CURITIBA PR - BRASIL
|
|
Postada em 14/07/2004 17:44 hs
Olá galera tudo legal? Alguém pode me dar uma dica de Como faço para alinhar valores a direita com o famigerado objeto Printer.print?
|
|
|
|
|
Postada em 14/07/2004 18:19 hs
Printer.CurrentX = PosicaoFinal - Printer.TextWidth(CStr(Numero)) Printer.Print Numero Onde PosicaoFinal é a coordenada à direita dos números, onde você quer que fiquem todos alinhados, e Numero é o seu valor. Se a variavel for String, não precisa usar o CStr(). Flw! Elieser Topassi
|
|
|
Keyo
|
CURITIBA PR - BRASIL
|
|
Postada em 15/07/2004 08:19 hs
Valeu Elieser! "Vô dá umas testada nesse baguio" Obrigado e se precisar estamos por ai.
|
|
|
jvlsm
|
SANTA MARIA RS - BRASIL
|
|
Postada em 15/07/2004 09:11 hs
Caro Colega, Estas são as funções para alinhar: esquerda, centro e direita: Public Sub AlignLeft(ByVal strText As String) Printer.CurrentX = Printer.CurrentX + 2 End Sub ----------------------------------------------------------------------------- Public Sub AlignCenter(ByVal strText As String) Printer.CurrentX = ((Printer.ScaleWidth - Printer.TextWidth(strText)) / 2) End Sub ----------------------------------------------------------------------------- Public Sub AlignRight(ByVal strText As String) Printer.CurrentX = Printer.ScaleWidth - 2 End Sub falow!
|
|
|
Keyo
|
CURITIBA PR - BRASIL
|
|
Postada em 15/07/2004 15:07 hs
|
|
|
Keyo
|
CURITIBA PR - BRASIL
|
|
Postada em 15/07/2004 15:49 hs
Valeu a boa vontade rapaziada com ajuda de vcs matei dois coelhos com uma pauldada só. Funfou direitinho!!!!!!! Se precisarem de mim e só avisar. Um Abraço Keyo Voigt - Curitiba/Pr
|
|
|