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

Вниз

число.число => число,число   Найти похожие ветки 

← →
Johnny Raw ©   (2004-07-11 14:13) [0]

существует ли простой способ перегнать строку вида 12.12 etc. вo float, или может можно в наствойках Delphi поменять разделитель.
а то у меня сильно длинно получается:

posit:=pos(".", fm1.sg1.Cells[2, m]);
mr:=Copy(fm1.sg1.Cells[2, m], 1, Length(fm1.sg1.Cells[2, m])-posit-1)+","+copy(fm1.sg1.Cells[2, m], pos(".", fm1.sg1.Cells[2, m])+1, Length(fm1.sg1.Cells[2, m])-posit);


---

← →
Arm79   (2004-07-11 14:29) [1]

1 - StrToFloat
2 - панель управления, язык и стандарты, числа, разделитель ...

---

← →
KilkennyCat ©   (2004-07-11 14:56) [2]

и даже если так делать, то все гораздо проще:
var
s : string;
....
s[pos(".", s] := ",";  

или воспользоваться AnsiReplaceStr

---

← →
Igorek ©   (2004-07-11 15:38) [3]

Посмотри Sysutils.DecimalSeparator

---

← →
Johnny Raw ©   (2004-07-11 15:49) [4]

Всем спасибо. Поменял в винде.

---

← →
KilkennyCat ©   (2004-07-11 15:51) [5]

> Johnny Raw ©   (11.07.04 15:49) [4]


а я бы лучше поменял в коде... не у всех винды такие же.

---

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

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

Наверх

Память: 0.45 MB
Время: 0.028 c