Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.11.2013, 21:00   #21
ST@LKER
Пользователь
 
Регистрация: 25.10.2007
Сообщений: 38
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
Но floattostr(b) и возвращает String. Или тот же FormatFloat. Или это я придумал? Тренеруйся скалолаз
Код:
procedure TForm1.FormCreate(Sender: TObject);
var b:real;
a:string;
begin
 b:=0.4;
a:='0.4';
 StringReplace(floattostr(b),',','.',[rfReplaceAll]);
 edit1.Text:=floattostr(b);
end;
со строкой все работает, а так как на экране показано ничего не меняет, запятая как стояла так и стоит, так что прежде чем рекомендовать кому то тренероваться потренеруйся сам!
ST@LKER вне форума Ответить с цитированием
Старый 27.11.2013, 21:23   #22
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Код:
edit1.Text:=StringReplace(floattostr(b),',','.',[rfReplaceAll]);
HELP так и не читал. Или снизу вверх по диагонали? Вопрос на засыпку - чем функция отличается от процедуры? А вообще 6 лет на форуме и ни чему не научиться - это постараться надо
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 27.11.2013 в 21:26.
Аватар вне форума Ответить с цитированием
Старый 27.11.2013, 22:12   #23
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

Цитата:
StringReplace(floattostr(b),',','.' ,[rfReplaceAll]);
edit1.Text:=floattostr(b);
это бомба..
eval вне форума Ответить с цитированием
Старый 28.11.2013, 00:24   #24
ST@LKER
Пользователь
 
Регистрация: 25.10.2007
Сообщений: 38
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
Код:
edit1.Text:=StringReplace(floattostr(b),',','.',[rfReplaceAll]);
HELP так и не читал. Или снизу вверх по диагонали? Вопрос на засыпку - чем функция отличается от процедуры? А вообще 6 лет на форуме и ни чему не научиться - это постараться надо
какая разница когда я здесь зарегистрировался, пишу я сюда не часто.
делфи вместе из С++ итак много места жрут, так что HELP просто не поместился бы физически
функция возвращает значение а процедура нет, ясно объяснил?

Последний раз редактировалось ST@LKER; 28.11.2013 в 00:30.
ST@LKER вне форума Ответить с цитированием
Старый 28.11.2013, 08:50   #25
alextrof94
Форумчанин
 
Регистрация: 16.03.2013
Сообщений: 599
По умолчанию

ST@LKER посмотри на свою репутацию и на репутацию Аватар.
Ясное дело, Аватар знает о чем говорит, а ты просто понять не можешь.
А eval оффтопер форумный.
ST@LKER храни число в переменной, а когда надо записать куда нибудь и показать используй StringReplace(floattostr(ПЕРЕМЕННАЯ ),',','.',[rfReplaceAll]); будь то TEdit или же SQL запрос.
alextrof94$gmail.com
alextrof94 вне форума Ответить с цитированием
Старый 28.11.2013, 11:06   #26
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

Цитата:
храни число в переменной, а когда надо записать куда нибудь и показать используй StringReplace(floattostr(ПЕРЕМЕННАЯ ),',','.',[rfReplaceAll]); будь то TEdit или же SQL запрос.
продолжаем кушать попкорн
дети кулибина не спят
eval вне форума Ответить с цитированием
Старый 28.11.2013, 11:28   #27
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
будь то TEdit или же SQL запрос.
Не согласен.
Во-первых: в SQL запросах стоит в таких случая применять параметризацию.
Во-вторых: Ты с помошью StringReplace(floattostr(ПЕРЕМЕННАЯ ),',','.',[rfReplaceAll]) сделаешь что? Переведешь вещественное в строку с заменой разделителя, который и так будет правильным? Если бояться что floattostr вернет запятую в строке то нужно настраивать FormatSettings а не выкручивать пальцы.
Код:
  FormatSettings.DecimalSeparator:='-';// Специально для наглядности тире
  Caption:=FloatToStr(123.456);
I'm learning to live...

Последний раз редактировалось Stilet; 28.11.2013 в 11:31.
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
DBEdit не вводится число с точкой Женя32 БД в Delphi 5 21.10.2013 19:46
действительное число с плавающей точкой, его модуль и квадрат (pascal ABC) программирование Помощь студентам 1 01.05.2013 22:15
Написать схематично программу с функцией, возвращающей целое число и число с десятичной точкой(Экзам. вопрос). datileo Visual C++ 1 22.06.2011 09:49
Как в edit отобразить путь? blackstersl Общие вопросы Delphi 6 23.06.2009 11:46
Как округлить число до сотых в Edit xxxsas Общие вопросы C/C++ 3 25.01.2009 09:04