Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.47 MB
Время: 0.023 c
1-1089147829
AndrewVolkov
2004-07-07 01:03
2004.07.25
:=nil; Free; Destroy


4-1087052115
juiceman
2004-06-12 18:55
2004.07.25
клавиатурный шпионаж


1-1089697212
Константин2000
2004-07-13 09:40
2004.07.25
USB принтер программируем


3-1088753741
white
2004-07-02 11:35
2004.07.25
Подскажите какой компонент поможет в решении следующей задачи.


4-1086851399
химик
2004-06-10 11:09
2004.07.25
Перехват печати на принтер