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@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to