Как вывести числа в графическом режиме?Outtext тока тип string выводит.Остается только преобразовать число к типу string, как?Или еще как-то можно? :p2:
volvo
16.08.2005 22:26
Или так:
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.
Юрий
17.08.2005 21:28
Спасибо! ;)
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.