F�rum DisplayFormat no Rave #367448

30/12/2008

Salve!

tenho um relat�rio no Rave, e nele tenho alguns componentes do tipo �DataText� e um componente do tipo �Text�

no evento OnBeforePrint do componente �Text� eu fa�o o seguinte:

var
Serv,Parc,Colab,Desp : Double;

Serv  := StrToFloat(txtServ.text);
Parc  := StrToFloat(txtParc.text);
Colab := StrToFloat(txtColab.text);
Desp  := StrToFloat(txtDesp.text);

txtSaldo.text := FloatToStr((Serv + Parc)-(Colab + Desp));

if StrToFloat(txtsaldo.text) < 0 then
 self.color := clRed; 
 else
  self.color := clBlack;
end if;

Self.text                            := FormatFloat(�#,0.00�, StrToFloat(self.Text));

dvBalancoServicos.DisplayFormat      := �,0.00�;
dvBalancoParcelas.DisplayFormat      := �,0.00�;
dvBalancoDespesas.DisplayFormat      := �,0.00�;
dvBalancoColaboradores.DisplayFormat := �,0.00�;

O lance � que quando eu dou aqueles �DisplayFormat� ali no DataView, o mesmo nao formata os valores.

eu poderia colocar a formata��o direto na propriedade de cada campo, e nao via c�digo como estou fazendo, por�m se eu fizer isso vou ter problemas de convers�o ao fazer o calculo acima.

algu�m poderia me dar uma for�a?

s� preciso saber o por que da inefic�cia do meu DisplayFormat ou entao como fazer isso de outra maneira.

abra�os!

Mahdak

Curtir t�pico

+ 0

Responder

Posts

06/01/2009

Under

vc j� tentou usar no onGetText do campo:

if value <> �� then
  value := formatFloat(�,0.00�, strtoFloat(value));

Responder

Gostei + 0

06/01/2009

Mahdak

resolvido...

if value <> �� then
  value := formatFloat(�,0.00�, strtoFloat(value));
end if;

valeu!

Responder

Gostei + 0