Fórum Dúvida com Query #268839
16/02/2005
0
Caros colegas,
Estou fazendo um relatório aonde utilizo um TQuery, existe um campo dessa minha consulta que é Lógico e naum estou conseguindo exibir esse cara no meu relatório. A idéia q tive foi colocar um QRLabel do relatório e se esse campo fosse True o QRlabel ficaria visível, caso contrário ele não apareceria. Coloquei p/isso o seguinte código:
While not QyFiltro.Eof Do
Begin
If QyFiltro.FieldByName(´Contrato´).AsBoolean = True Then
QRLabel1.Enabled := True
Else
QRLabel1.Enabled := False;
End;
Só q naum funciona. O que estou fazendo de errado? Alguém pode me ajudar?
Agradeço a todos.
Fabiano.
Estou fazendo um relatório aonde utilizo um TQuery, existe um campo dessa minha consulta que é Lógico e naum estou conseguindo exibir esse cara no meu relatório. A idéia q tive foi colocar um QRLabel do relatório e se esse campo fosse True o QRlabel ficaria visível, caso contrário ele não apareceria. Coloquei p/isso o seguinte código:
While not QyFiltro.Eof Do
Begin
If QyFiltro.FieldByName(´Contrato´).AsBoolean = True Then
QRLabel1.Enabled := True
Else
QRLabel1.Enabled := False;
End;
Só q naum funciona. O que estou fazendo de errado? Alguém pode me ajudar?
Agradeço a todos.
Fabiano.
Fabiano_aprendiz
Curtir tópico
+ 0
Responder
Posts
16/02/2005
Gandalf.nho
Sugestão melhor: use o componente do link abaixo. É um QRCheckBox, em versão normal e data-aware. É freeware.
[url]http://www.torry.net/vcl/reports/quickreport/qrcb.zip[/url]
[url]http://www.torry.net/vcl/reports/quickreport/qrcb.zip[/url]
Responder
Gostei + 0
16/02/2005
Fabiano_aprendiz
Solucionei o problema colocando o código direto dentro da banda Detail do Quickreport e ele já faz um while retornando no recordset.
[]´s
Fabiano.
[]´s
Fabiano.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)