Fórum Qrlabel: tem como o texto ficar na vertical ? #186433

06/10/2003

0

se puder. me ajudem .. valeu ...


Echoesofpinkfloyd

Echoesofpinkfloyd

Responder

Posts

06/10/2003

Luizfernando777

sim, tem como fazer isso,

tem componente


Responder

Gostei + 0

06/10/2003

Tbergz

se puder. me ajudem .. valeu ...


8)
Esse codigo coloca um Label na vertical, se for util blz entao.
var
texto:string;
i:integer;
begin
texto:=Label1.caption;
Label1.Height:=length(texto)*13;
Label1.caption:=´´;
for i:=0 to length(texto)-1 do
begin
Label1.caption:= Label1.caption + texto[i]+#13;
end;
Label1.Repaint;


Responder

Gostei + 0

06/10/2003

Echoesofpinkfloyd

[quote:7c580c99bb=´EchoesOfPinkFloyd´]se puder. me ajudem .. valeu ...


8)
Esse codigo coloca um Label na vertical, se for util blz entao.
var
texto:string;
i:integer;
begin
texto:=Label1.caption;
Label1.Height:=length(texto)*13;
Label1.caption:=´´;
for i:=0 to length(texto)-1 do
begin
Label1.caption:= Label1.caption + texto[i]+#13;
end;
Label1.Repaint;[/quote:7c580c99bb]

blz, vou testar no Qrlabel pra ver se funciona, qualquer coisa posto aqui .. valeu .....


Responder

Gostei + 0

06/10/2003

Rfpsatin

Não testei o exemplo + parece q vc ta colocando caracter embaixo de caracter, é isso mesmo?

Se for isso acho q não é o q ele quer, bem, pelo menos precisei uma x colocar o texto todo na vertical e não tive outra opção a não ser usar componentes de 3os.


Responder

Gostei + 0

06/10/2003

Echoesofpinkfloyd

Não testei o exemplo + parece q vc ta colocando caracter embaixo de caracter, é isso mesmo? Se for isso acho q não é o q ele quer, bem, pelo menos precisei uma x colocar o texto todo na vertical e não tive outra opção a não ser usar componentes de 3os.


ah é realmente nao havia pensado nisso... va sair caracter embaixo do outro tipo :
A
B
C

na verdade eu queria que fosse escrito na vertical...
vc conhece algum procedimento ou componente. . free de preferencia ...
abraçosl


Responder

Gostei + 0

06/10/2003

Luizfernando777

Caro colega,
eu tenho um componente que escreve em qualquer angulo

me escreva que lhe mando
luizfernando777@yahoo.com.br


Responder

Gostei + 0

06/10/2003

Marcelo.c

www.qusoft.com em Add On products, procure por TQRAngledLabel


Responder

Gostei + 0

06/10/2003

Echoesofpinkfloyd

www.qusoft.com em Add On products, procure por TQRAngledLabel


valeu pela ajuda ..


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar