Показать сообщение отдельно
  #4  
Старый 21.03.2009, 07:51
Аватар для Karsh
Karsh Karsh вне форума
Активный
 
Регистрация: 22.09.2007
Адрес: SPb
Сообщения: 228
Версия Delphi: 7, 2009, XE2
Репутация: 70
По умолчанию

можно путем проверки на "отрецательность числа", например:
Код:
if x > 0 then s:= '+' + FloatToStr(x) else s:= FloatToStr(x);
__________________
Начинающий программист уверен, что в 1 килобайте 1000 байт.
Законченный программист уверен, что в 1 километре 1024 метра.
Ответить с цитированием