Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.09;
Скачать: CL | DM;

Вниз

Взять Real   Найти похожие ветки 

 
2Wish   (2005-09-19 15:21) [0]

Подскажите пожалуйста как взять из TEdit Реальное число. Извините пожалуйста за дебильный вопрос, но сам никак не могу понять уже полтора часа пытаюсь =(


 
TUser ©   (2005-09-19 15:23) [1]

vra s: string;
begin
s:=StringReplace(Edit1.Text,".",DecimalSeparator,[rfReaplaceAll]);
s:=StringReplace(s,",",DecimalSeparator,[rfReaplaceAll]);
 StrToFloat (s)


 
Николай1   (2005-09-19 15:24) [2]

var
a:Real;
begin
A:=StrToFloat(Edit.text);
end;


 
2Wish   (2005-09-19 15:25) [3]

пасиб большое


 
2Wish   (2005-09-19 15:26) [4]

2TUser а эти оператора чтобы работало как с точной так и с запетой, да а тоя не чоень понимаю? -

s:=StringReplace(Edit1.Text,".",DecimalSeparator,[rfReaplaceAll]);
s:=StringReplace(s,",",DecimalSeparator,[rfReaplaceAll]);



Страницы: 1 вся ветка

Текущий архив: 2005.10.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.04 c
4-1123735019
ndn
2005-08-11 08:36
2005.10.09
Медленная печать на матричном принтере


14-1127107307
Ega23
2005-09-19 09:21
2005.10.09
В среду приятель погиб


4-1124021579
webpauk
2005-08-14 16:12
2005.10.09
Сообщение при прерывании процесса


1-1126781238
Aliv
2005-09-15 14:47
2005.10.09
установить ограничение после запятой


11-1107935104
ser_ker
2005-02-09 10:45
2005.10.09
Работа с БД через ODBC