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
<*> 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
