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