Настройки FPC

[mashinist_poezda]

Доброго время суток! Как сделать, чтобы консольная программа отображала результат до двадцати цифр после запятой, по умолчанию у меня показывается до пятнадцати?

OS: Ubuntu 11.10
IDE: Geany 0.20
Compiler: FPC 2.4.4

Заранее благодарю. Как я понимаю, это где-то конфиг должен быть

[Сквозняк]

Почти всё содержание конфига дублируется директивами компилятора, посмотри новую документацию, вдруг на днях добавили 18 знаков после запятой получить легко, дальше идёт мусор

Код: Выделить всё

{$MODE FPC}
var
Q1: extended;


function v_str(z: extended): string;
var
q,w: byte;
q64: Int64;
s,x: string;
begin
q64:=trunc(z);
str(q64,s);
s:=s+'.';
z:=abs(z)-abs(q64);
for q:=1 to 22 do begin
                  z:=z*10;
                  w:=trunc(z);
                  z:=z-w;
                  str(w,x);
                  s:=s+x;
                  end;
v_str:=s;
end;


begin
Q1:=-2.1234567890123456789012;
Writeln(Q1);
Writeln(v_str(Q1));
end.