Print #1 "Quebrar texto em varias linhas"


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Print #1 "Quebrar texto em varias linhas"

João Paulo

ARCOS
MG - BRASIL

Postada em 17/04/2006 15:55 hs

Me desculpem por estar postando novamente, mais é que eu ainda não consegui resolver este problema.

Tenho que fazer a impressao de um TextBox (txtOBS.text), o problema é que cabem somente 17 caracteres em cada linha no Campo Observação do Formulário Continuo do meu cliente. Tenho que imprimir + ou - assim. Ex:

Nome do Cliente Observação:

João Paulo Pires Entregar na rua S

anta Distrito Ind

ustrial lll

Como faço isso pelo amor de Deus, to precisando muito disso.

ghost_jlp

SÃO PAULO
SP - BRASIL

Postada em 17/04/2006 16:47 hs

Olá de novo amigo... então, naquela vez a gente tinha conseguido quebrar a linha a cada 17 caracteres... para alinhar a direita tente usar o código abaixo:

************************************************************
Private Sub AlinhaDireita(objSaida As Object, LMarg, TMarg, RgWid, RgHgt _
As Integer, texto As String)

Dim txMarg As Integer

txMarg = RgWid - objOut.TextWidth(texto) - 10

    If txMarg < 0 Then txMarg = 0
    objSaida.CurrentX = LMarg + txMarg
    objSaida.CurrentY = TMarg
    objSaida.Print Texto

End Sub
**********************************************************
Para chamar a função use deste modo:
****************************************************************
Dim texto As String
Dim objWid As Integer
Dim objHgt As Integer

texto = Text1.Text

objWid = Picture1.ScaleWidth
objHgt = Picture1.ScaleHeight

Picture1.Cls

AlinhaDireita Picture1, 5, 5, objWid, objHgt, texto
******************************************************************
Fonte: http://www.macoratti.net/printer.htm
Só q no caso vc adapta para o seu código... só aproveita o alinhamento q a sub faz.
Então vc quebra igual ao código q eu te passei. Depois vc passa este texto para a sub para q
ela alinhe à direta...

qq coisa é só postar... no se preocupa!! "Nóis consegue"
:)
t+

Elieser Topassi

SÃO JOSÉ DO RIO PRETO
SP - BRASIL

Postada em 18/04/2006 09:15 hs

Nao entendi, Joao.
No outro post a gente tinha vistou um monte de codigos diferentes que faziam a quebra de linha... o q mais vc precisa ???

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
_____________________________________________________
"O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

JOÃO PAULO
não registrado

Postada em 18/04/2006 10:19 hs

É pessoal ta dificil, vcs tam me ajudando muito eu tento todos os códigos e nada funciona. O que vou fazer pra resolver isso?

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR