числа в графическом режиме Опции

[Юрий]

Как вывести числа в графическом режиме?Outtext тока тип string выводит.Остается только преобразовать число к типу string, как?Или еще как-то можно? :p2:

[volvo]

Или так:

Var 
  s: String;
  i: Integer;
begin
  ...
  Str(i, s); OutText(s);
  ...
end.

или так:

Function IntToStr(i: Integer): String;
Var s: String;
Begin
  Str(i, s); IntToStr := s
End;

Begin
  ...
  Outtext(IntToStr(20));
  ...
End.

[Юрий]

Спасибо! ;)