Funcionar funciona, mas quando quer... :D
Eu criei esta funcao. Dai sempre que tenho um Agg redireciono o OnGetText dele
para esta funcao.
O codigo está abaixo.
[]'s
Francisco Thiago de Almeida
"Se é verdade que todos os caminhos levam a Deus, porque será que nem todas
estradas levam ao mesmo lugar?"
class procedure TDbUtils.getCurrencyField(Sender: TField; var Text: string;
DisplayText: Boolean);
begin
if Sender.Value = Null then
Text := Currencystring + '0'+ DecimalSeparator +'00'
else
Text :=
FloatToStrF(TNumericUtils.VariantToFloat(Sender.Value),ffCurrency,18,2);
end;
----- Original Message -----
From: Aliely Sampaio
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, January 16, 2007 3:59 PM
Subject: Re: [delphi-br] Aggregate(O QUE FAÇO?!)
Se pudesse dar mais uma maozinha... é o seguinte: O display Format do
Aggregate não funciona! É um valor monetário e queria saida formatada....
Alguma sugestão?
Desde já agradeço!
Wagner Binoto <[EMAIL PROTECTED]> escreveu:
Amigo, eu resolvi isto fechando e abrindo o clientDataSet....
Abraços
----- Original Message -----
From: sampaiobrito
To: delphi-br@yahoogrupos.com.br
Sent: Monday, January 15, 2007 5:33 PM
Subject: [delphi-br] Aggregate(O QUE FAÇO?!)
Amigos,
Tenho um relacionamento mestre detalhe (feito com 2 clientdataset's
pela configuração da propriedade MasterFields) o problema é o seguinte:
para o campo valor do clientdataset 'Filho' criei um Aggregate, só que
quanto passo um parâmetro para o ClientDataSet 'Pai' e mudo os
registros filhos, parece que ele está armazenando o valor da última
linha e somando com a que está selecionada no conjunto atual ( no que
foi carregado)... O que faço... Alguém já passou por isto e pode dá uma
maozinha...
Desde já agradeço!
[As partes desta mensagem que não continham texto foram removidas]
__________________________________________________
Fale com seus amigos de graça com o novo Yahoo! Messenger
http://br.messenger.yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
