Главная страница
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.026 c
14-1127034706
BRaT-2
2005-09-18 13:11
2005.10.09
Delphi


3-1123867184
Silver...
2005-08-12 21:19
2005.10.09
CrossTable + Редактирование


14-1126591201
REA
2005-09-13 10:00
2005.10.09
День программиста


2-1125370412
The Sound
2005-08-30 06:53
2005.10.09
String TO PAnsiChar


1-1127206379
~viper~
2005-09-20 12:52
2005.10.09
разница между датами в виде 22 года 4 месяца 12 дней