ThousandSeparator
Moduł: SysUtils
var ThousandSeparator: Char;
Zmienna globalna określa znak używany do separowania liczb większyć niż tysiąc. Przykładowo:
var
Value : Currency;
begin
ThousandSeparator := '/';
Value := 1544.45;
Writeln(Format('%m', [Value]));
Readln;
end.
Taki kod wyświetli na ekranie konsoli napis: 1/544.45 zł.
Zobacz też: