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

Вниз

Точка вместо запятой   Найти похожие ветки 

 
Neket   (2007-11-20 17:29) [0]

подскажите пожалуйста как имея вот такую запись
s:=floattostr(strtoint(Form1.ComboBox1.Text)/100);
если ComboBox1.Text="2" то получаю 0,02 а как получить 0.02 ?


 
Плохиш ©   (2007-11-20 17:31) [1]

decimalseparator


 
Neket   (2007-11-20 17:32) [2]

Варинт
for i:=0 to length(s) do
if s[i]="," then s[i]|:="."

не катит :-)


 
Джо ©   (2007-11-20 17:35) [3]

> [2] Neket   (20.11.07 17:32)
> Варинт
> for i:=0 to length(s) do
> if s[i]="," then s[i]|:="."
>
> не катит :-)

Зато вполне «катит» вариант [1] Плохиш ©.


 
Neket   (2007-11-20 17:41) [4]

А можно полностью формат функции?


 
Плохиш ©   (2007-11-20 17:43) [5]


> Neket   (20.11.07 17:41) [4]
> А можно полностью формат функции?

какой?


 
Neket   (2007-11-20 17:44) [6]

decimalseparator


 
Neket   (2007-11-20 17:46) [7]

ну или как это использовать?


 
Плохиш ©   (2007-11-20 17:48) [8]

DecimalSeparator Variable

DecimalSeparator is the character used to separate the integer part from the fractional part of a number. This variable must have a value other than #0.
Unit
SysUtils

Syntax

[Delphi] var DecimalSeparator: Char;

Description
On Windows, the initial value is fetched from LOCALE_SDECIMAL.


Borland® Copyright © 2005 Borland Software Corporation. All rights reserved.


 
Goric ©   (2007-11-20 18:06) [9]

S := AnsiReplaceStr(S, ",", ".");


 
Джо ©   (2007-11-20 19:12) [10]

> [7] Neket   (20.11.07 17:46)
> ну или как это использовать?

DecimalSeparator := "."


 
Virgo_Style ©   (2007-11-21 00:58) [11]

> Плохиш ©   (20.11.07 17:48) [8]

Хм, теперь на английском? -))


 
Германн ©   (2007-11-21 01:41) [12]


> Virgo_Style ©   (21.11.07 00:58) [11]
>
> > Плохиш ©   (20.11.07 17:48) [8]
>
> Хм, теперь на английском? -))
>

Наверно обрыдла неметчина по самое никуда.
:-)



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

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

Наверх




Память: 0.49 MB
Время: 0.032 c
15-1195042164
de.
2007-11-14 15:09
2007.12.16
RS-422/485


15-1195208295
Асм
2007-11-16 13:18
2007.12.16
студия для асма


2-1195625789
Kolan
2007-11-21 09:16
2007.12.16
Помогите сделать маску в MaskEdit.


2-1195232737
Nightmare
2007-11-16 20:05
2007.12.16
UpdateLayerWindow


11-1180276770
Vladimir Kladov
2007-05-27 18:39
2007.12.16
Пожелания: GRushControls