Текущий архив: 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.048 c