porque não usa um expression, basta colocar no Expression o
if(nomedocampo=1;'+';'-')
Tenta aí e qualquer dúvida me fala, to no msn: [EMAIL PROTECTED]
----- Original Message -----
From: Ana Júlia Solano Rocha
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, June 08, 2005 12:08 PM
Subject: Re: [delphi-br] Mudar sinal
Olá Rodrigo!
Tente colocar este código no BeforePrint da banda onde está o s:
if (dtm.dsn_cred.DataSet.FieldValues['des_status'] = 0 ) then
s.Caption := '+'
else
s.Caption := '-';
Veja se isto resolve seu problema.
Abraços,
Ana
----- Original Message -----
From: "Rodrigo Mota" <[EMAIL PROTECTED]>
To: "[EMAIL PROTECTED] Com. Br" <delphi-br@yahoogrupos.com.br>
Sent: Wednesday, June 08, 2005 11:44 AM
Subject: [delphi-br] Mudar sinal
Estou com um pequeno problema no código, isso no quickreport.
Quando gero um relatório e tem os valores e tal tem números que são
créditos e outros débitos
No banco de dados não estou gravando como sendo negativo.
O que preciso:
Quando des_status = 0 sai s.caption = '+';
Quando des_status = 1 sai s.caption = '-';
O problema é que ele fica sempre na mesma lisnha, tentei colocar NEXT e
tb não passou o próximo registro
O código está no (Tprint_cred_deb.QuickRep1BeforePrint)
for i := 0 to dtm.tb_cred.RecordCount do
begin
if (dtm.dsn_cred.DataSet.FieldValues['des_status'] = 0 ) then
begin
s.Caption := '+';
end else
begin
s.Caption := '-';
end;
Rodrigo Mota
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
Esta mensagem foi verificada pelo E-mail Protegido Terra.
Scan engine: McAfee VirusScan / Atualizado em 07/06/2005 / Versão: 4.4.00 -
Dat 4508
Proteja o seu e-mail Terra: http://mail.terra.com.br/
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
------------------------------------------------------------------------------
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
do Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
