Autor
Mensagem
Postado em: 14/6/2011 01:09:50 PM
Tenho um relatorio de produtos com o quick report, porem alguns produtos apresentam grade e outros nao, gostaria que o relatorio mostrasse o qrlabel se tiver grade ou nao caso nao tenha, nao estou sabendo em qual evneto colocar tentei no radiobuttoin de um outro formulario que abre o quick reprot da seguinte maneira:
#Código
Form_Relatorio_Produto.ADOQuery1.Open; if Form_Relatorio_Produto.ADOQuery1.FieldByName(´descricao').text = emptystr then begin Form_Relatorio_Produto.QRlabel11.Visible := false; end; Form_Relatorio_Produto.QuickRep1.Preview; Form_Relatorio_Produto.ADOQuery1.Close;Porem ele continua mostrando o qrlabel Fico no aguardo.
Postado em: 14/6/2011 02:11:39 PM
Olá Daniel !
Basta você fazer da seguinte forma, em vez de usar o visible utiliza o enabled que resolve seu problema.
#Código
Espero ter ajudado.
Eliel G. Martins
Basta você fazer da seguinte forma, em vez de usar o visible utiliza o enabled que resolve seu problema.
#Código
if Form_Relatorio_Produto.ADOQuery1.FieldByName(´descricao').text = emptystr then begin Form_Relatorio_Produto.QRlabel11.Enabled := false; end; Form_Relatorio_Produto.QuickRep1.Preview; Form_Relatorio_Produto.ADOQuery1.Close;
Espero ter ajudado.
Eliel G. Martins
Postado em: 15/6/2011 06:39:39 PM
Citação:
Olá Daniel !
Basta você fazer da seguinte forma, em vez de usar o visible utiliza o enabled que resolve seu problema.
#Código
if Form_Relatorio_Produto.ADOQuery1.FieldByName(´descricao').text = emptystr then begin Form_Relatorio_Produto.QRlabel11.Enabled := false; end; Form_Relatorio_Produto.QuickRep1.Preview; Form_Relatorio_Produto.ADOQuery1.Close;
Espero ter ajudado.
Eliel G. Martins
Kra fiz uns testes porem nao tinha percebido que ele esconde todos os dados quando a verificação é positiva, no caso se o primeiro registro for com a descrição = emptystr ele esconde todos os qrlabrl11 mesmo nos que tem alguma coisa
