[Lazarus] whats wrong with that line of code?

[Werner Pamler]

This is how it works with the %m format

procedure TForm1.FormCreate(Sender: TObject);
begin
   DefaultFormatSettings.Currencystring := '€';
   Label1.Caption := Format('%m', [11111111.0]);
   // "Format" instead of "FormatCurr", parameter in square brackets, 
value must be a float
end;

Am 15.08.2015 um 11:13 schrieb John Landmesser:
> CurrencyString shows €
>
> FormatCurr('%M',111111111) -> %M
>
> Expected a currency string as '111.111.111,00 €'
>
> System: Linux, Debian Sid
>
> sorry for that really idiotic question :-))
>
>
>
> -- 
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus