[DUG]: String Format problem

'nother newbie question.

I am reading a QRExpr field in a QuickReport band and want to write it out (to an ascii file) formatted as $##,##0.00, but can't.

I have the following:

procedure WriteStuff;

var Amt : Currency

begin

Amt := SubTotal.Value.dblResult;
Write(AsciiFile,CurrToStr(Amt));
end.

The output is not in any currenvy format.

Have also tried:

procedure WriteStuff;

var Amt : String

begin

Amt := FormatCurr('$##,##0.00',SubTotal.Value.dblResult);
Write(AsciiFile,Amt);
end.

This puts the $ in but the output has up to 4 decimal places.

Any suggestions?

TIA

Mark

Reply via email to