Substituir valores no QReport
Ola pessoal, alguem saberiame dizer como eu faço para mostrar um valor no QuickReport ao inves do que esta no banco de Dados..
Por Ex.:
Tenho um campo chamado CIC, e estou gerando um relatorio que me exiba os dados da pessoa. Mas no caso de o pessoa nao ter o CIC, iria aparecer em branco no relatorio, e eu gostaria que aparecece ´Cic nao cadastrado´ ao inves de ´nada´..
Como posso fazer isso?
Obrigado por enquanto..
Renato
Por Ex.:
Tenho um campo chamado CIC, e estou gerando um relatorio que me exiba os dados da pessoa. Mas no caso de o pessoa nao ter o CIC, iria aparecer em branco no relatorio, e eu gostaria que aparecece ´Cic nao cadastrado´ ao inves de ´nada´..
Como posso fazer isso?
Obrigado por enquanto..
Renato
Anonymous
Curtidas 0
Respostas
Anonymous
12/02/2003
No evento OnBeforePrint da Banda (Detail/SubDetail), voce faz a validacao para saber se tem CIC cadastrado. Se tiver, atribui o CIC ao campo QrText.Caption (ou QrText.Text, não me lembro bem). Se nao tiver, é só atribuir a string que voce quiser.
GOSTEI 0
Anonymous
12/02/2003
use o evento OnPrint do do QRDBText, atribuindo o texto que você quiser para Value. Funciona muito melhor que no OnBeforePrint da Banda
GOSTEI 0
Anonymous
12/02/2003
Vou tentar
Obrigado;;
Obrigado;;
GOSTEI 0
Anonymous
12/02/2003
:cry:
Tentei dos dois jeitos mas nao deu certo..
Existe alguma outramaneira?
Obrigado.
Tentei dos dois jeitos mas nao deu certo..
Existe alguma outramaneira?
Obrigado.
GOSTEI 0
Mardônio
12/02/2003
Tente trabalhar com o evento OnGetText do componente de dados em questão.
Exemplo:
if Sender.IsNull then
Text := ´CIC não cadastrado.´
Espero ter ajudado, qualquer dúvida escrevar.
Atenciosamente,
Mardônio Cavalcante
Exemplo:
if Sender.IsNull then
Text := ´CIC não cadastrado.´
Espero ter ajudado, qualquer dúvida escrevar.
Atenciosamente,
Mardônio Cavalcante
GOSTEI 0
Anonymous
12/02/2003
Crie um campo calculado na Query ou Table em questao, para receber o CIC.
E no Evento OnCalcFields escreva a seguintes linhas:
if QueryCIC.Value = ´´ then
QueryCampoCalculado.Value:=´CIC nao cadastrado´
else
QueryCampoCalculado.Value:=QueryCIC.Value;
OK!!!
Francisco Brito
E no Evento OnCalcFields escreva a seguintes linhas:
if QueryCIC.Value = ´´ then
QueryCampoCalculado.Value:=´CIC nao cadastrado´
else
QueryCampoCalculado.Value:=QueryCIC.Value;
OK!!!
Francisco Brito
GOSTEI 0