cerberus12 Postado Agosto 13, 2008 Denunciar Share Postado Agosto 13, 2008 Estou tendo problemas para fazer com que o código - qrletiquetas.DetailBand1.Size.width:=63.8; - que modifica o tamanho da band no quick report seja alterado em tempo de execução, passo o valor , mas ele retorna o valor padrão 4,.... alguma coisa.alguém saberia responder isso? código completo abaixo: qrletiquetas.QuickRep1.Page.Columns:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('in_numcoletiq').asinteger*10; qrletiquetas.QuickRep1.Page.ColumnSpace:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('in_espacocol').asfloat*10; qrletiquetas.QuickRep1.Page.LeftMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemlateral').asfloat*10; qrletiquetas.QuickRep1.Page.Length:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('in_alturapagina').asfloat*10; qrletiquetas.QuickRep1.Page.Orientation:=poPortrait;// qrletiquetas.QuickRep1.Page.PaperSize:='A5'; qrletiquetas.QuickRep1.Page.LeftMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemlateral').asfloat*10; qrletiquetas.QuickRep1.Page.RightMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemlateral').asfloat*10; qrletiquetas.QuickRep1.Page.TopMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemsup').asfloat*10; qrletiquetas.QuickRep1.Page.bottomMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemsup').asfloat*10; qrletiquetas.QuickRep1.Page.Width:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('in_largurapagina').asfloat*10; qrletiquetas.QuickRep1.PrinterSettings.Copies:=strtoint(edcopias.text); //qrletiquetas.QuickRep1.units:=qrMM; //qrletiquetas.DetailBand1.Height:=128; //qrletiquetas.DetailBand1.Width:=241; qrletiquetas.DetailBand1.Size.width:=63.8; qrletiquetas.DetailBand1.Size.height:=33.9; Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Jhonas Postado Agosto 15, 2008 Denunciar Share Postado Agosto 15, 2008 Estou tendo problemas para fazer com que o código - qrletiquetas.DetailBand1.Size.width:=63.8; - que modifica o tamanho da band no quick report seja alterado em tempo de execução, passo o valor , mas ele retorna o valor padrão 4,.... alguma coisa.alguém saberia responder isso?Qualquer modificação deve ser executada antes do preview do QR no evento OnBeforePrintModificações de tamanho na banda de detalhe durante a impressão tambem são possiveis, desde que exista uma condição que seja satisfeita em qualquer campo existente dentro da banda, usando o evento OnPrint deste campo. Supondo que todos os campos já foram definidos na banda de detalhe, não vejo razão para alterar este tamanho, o que implicaria somente em mais espaços em branco na folha.abraço Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
cerberus12
Estou tendo problemas para fazer com que o código - qrletiquetas.DetailBand1.Size.width:=63.8; - que modifica o tamanho da band no quick report seja alterado em tempo de execução, passo o valor , mas ele retorna o valor padrão 4,.... alguma coisa.
alguém saberia responder isso?
código completo abaixo:
qrletiquetas.QuickRep1.Page.Columns:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('in_numcoletiq').asinteger*10;
qrletiquetas.QuickRep1.Page.ColumnSpace:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('in_espacocol').asfloat*10; qrletiquetas.QuickRep1.Page.LeftMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemlateral').asfloat*10;
qrletiquetas.QuickRep1.Page.Length:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('in_alturapagina').asfloat*10;
qrletiquetas.QuickRep1.Page.Orientation:=poPortrait;
// qrletiquetas.QuickRep1.Page.PaperSize:='A5';
qrletiquetas.QuickRep1.Page.LeftMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemlateral').asfloat*10;
qrletiquetas.QuickRep1.Page.RightMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemlateral').asfloat*10;
qrletiquetas.QuickRep1.Page.TopMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemsup').asfloat*10;
qrletiquetas.QuickRep1.Page.bottomMargin:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('margemsup').asfloat*10;
qrletiquetas.QuickRep1.Page.Width:=FrDmGr.QyGR_EtiqEstruturas.fieldbyname('in_largurapagina').asfloat*10;
qrletiquetas.QuickRep1.PrinterSettings.Copies:=strtoint(edcopias.text);
//qrletiquetas.QuickRep1.units:=qrMM;
//qrletiquetas.DetailBand1.Height:=128;
//qrletiquetas.DetailBand1.Width:=241;
qrletiquetas.DetailBand1.Size.width:=63.8;
qrletiquetas.DetailBand1.Size.height:=33.9;
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.