Fórum pegar altura de subdetail com campo autostretch=true? #343016
26/06/2007
0
Boa noite amigos
Uso Quickreport 3.6.2 pro
Como posso pegar a altura de um QRsubdetail que tem um componente/campo com a propriedade AutoStretch=True?
Meu problema é que está pegando a altura fixa que é setado em tempo de projeto e preciso que em run-time pegue a altura que varia a cada registro que é iterado
já tentei em todos eventos mas sempre pega a altura fixa do projeto.
Alguém tem alguma idéia?
Vou mostrar o que preciso fazer
---------------------------
produto1 rolamento de
rosca fina pra tampão
de cilindro
--------------------------
produto 2 roela 9/13
-------------------------
produto 3 correia
plana slc 6200
-------------------------
notar que a cada registro iterado a altura está sendo variada.
Então no fim da iteração preciso ter acumulado a altura.
Aguardo qq ajuda, dica, trecho de código, outro gerador que proporcione isto
Delmar
Uso Quickreport 3.6.2 pro
Como posso pegar a altura de um QRsubdetail que tem um componente/campo com a propriedade AutoStretch=True?
Meu problema é que está pegando a altura fixa que é setado em tempo de projeto e preciso que em run-time pegue a altura que varia a cada registro que é iterado
já tentei em todos eventos mas sempre pega a altura fixa do projeto.
Alguém tem alguma idéia?
Vou mostrar o que preciso fazer
---------------------------
produto1 rolamento de
rosca fina pra tampão
de cilindro
--------------------------
produto 2 roela 9/13
-------------------------
produto 3 correia
plana slc 6200
-------------------------
notar que a cada registro iterado a altura está sendo variada.
Então no fim da iteração preciso ter acumulado a altura.
Aguardo qq ajuda, dica, trecho de código, outro gerador que proporcione isto
Delmar
Delmar
Curtir tópico
+ 0
Responder
Posts
27/06/2007
Delmar
Colegas, consigo algum progresso e vim até aqui para compartilhar a solução
procedure TnNFimp.QRSubDetail1AfterPrint(Sender: TQRCustomBand;
BandPrinted: Boolean);
var Altura : extended;
begin
sender.ExpandedHeight(Altura);
TotalAltura:=TotalAltura+(Altura/10);
end;
Mas continua meu problema. Preciso agora setar a altura da banda em run-time, como faço, não está surtindo efeito aplicar no beforeprint da banda, códigos como os seguintes:
sender.Size.Height:=100-TotalAltura;
QRBandRodapeSub1.Size.Height:=100-TotalAltura;
tentei usar também
sender.Expanded:=100-TotalAltura; mas esta é somente leitura
Alguma outra dica
Aguardo por qualquer ajudar
Delmar
procedure TnNFimp.QRSubDetail1AfterPrint(Sender: TQRCustomBand;
BandPrinted: Boolean);
var Altura : extended;
begin
sender.ExpandedHeight(Altura);
TotalAltura:=TotalAltura+(Altura/10);
end;
Mas continua meu problema. Preciso agora setar a altura da banda em run-time, como faço, não está surtindo efeito aplicar no beforeprint da banda, códigos como os seguintes:
sender.Size.Height:=100-TotalAltura;
QRBandRodapeSub1.Size.Height:=100-TotalAltura;
tentei usar também
sender.Expanded:=100-TotalAltura; mas esta é somente leitura
Alguma outra dica
Aguardo por qualquer ajudar
Delmar
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)