Using FormatFloat in script

CaymanPort · January 2015

I am trying to print a currency formatted value to a TfrxMemoView on the report with the following script:

procedure txCreditLimitOnBeforePrint(Sender: TfrxComponent);
begin
Â Â if <TRAN."CREDITAPPROVED"> = 1 thenÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â 
Â Â Â Â txCreditLimit.Text := 'Credit Limit: ' + FormatFloat('%2.2m', <TRAN."CREDITLIMIT">)
Â Â else
Â Â Â Â txCreditLimit.Text := '';Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â  
end;

But all that I get out is %2.2m instead of the actual value. What am I doing wrong?

gpi · January 2015

Use Format function

procedure txCreditLimitOnBeforePrint(Sender: TfrxComponent);
begin
if <TRAN."CREDITAPPROVED"> = 1 then
txCreditLimit.Text := 'Credit Limit: ' + Format('%2.2m', [<TRAN."CREDITLIMIT">])
else
txCreditLimit.Text := '';
end;

CaymanPort · January 2015

gpi wrote: »

Use Format function

procedure txCreditLimitOnBeforePrint(Sender: TfrxComponent);
begin
if <TRAN."CREDITAPPROVED"> = 1 then
txCreditLimit.Text := 'Credit Limit: ' + Format('%2.2m', [<TRAN."CREDITLIMIT">])
else
txCreditLimit.Text := '';
end;

Ahhh! Ok... I thought that the Format function would only take a string as input? Thanks!

As an aside, what do the different brackets (ie: [] and <>) signify? They get used in different combinations in different places and I haven't quite figured out the logic behind them.

gpi · January 2015

[] used as expression delimiters in the TfrxMemoView, TfrxRichView
<> used as variables, fields delimiters in the script and expressions

Using FormatFloat in script

Comments

Leave a Comment