Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

"105.00" и "105,00" Как иcправить этот глюк? [D6, 95/98, ME, NT4, 2000, XP, 2003]


Officeman ©   (2006-04-12 07:58:00) 

Вопрос: Как иcправить этот глюк?

ОБработка, вынимает из текстового файла строку с ЦЕНОЙ   "105,00"
переводит в integer(strtoint) и производит подсчёт. Проверял прогу в комп.клубе.
Везде устнавлена XP prof,  на некоторых компах программа не работает:
типо пишет "Error value 105.00"

Я Предположил следующее: что в в установках XP, в панеле управления "языки и стандарты" установено. Показывать дробныи числа "."  и типо из за этого не бычит.


Германн   (2006-04-13 02:22:00) [1]


> извиниюсь за датошность.

Не стоит. Лучше извинись за дотошность. А, главное, за коряво сформулированный вопрос.


Плохиш   (2006-04-13 01:26:00) [2]


> и тады всегда будет использоваться в других процедурах  
> и функциях только этот разделитель для integer , да ?

До тех пор пока система не пошлёт задаче сообщение об обновлении системных настроек.


Officeman   (2006-04-12 23:16:00) [3]

спасибо за комменты.

т.е.  я могу смело на собитии Form1onCreate()

вписать

DecimalSeparator := ',';

и тады всегда будет использоваться в других процедурах  и функциях только этот разделитель для integer , да ?

//----------
извиниюсь за датошность.


balepa   (2006-04-12 13:00:00) [4]


> Officeman   (12.04.06 07:58)  
> Вопрос: Как иcправить этот глюк?

ЭТО НЕ ГЛЮК!!!


Desdechado   (2006-04-12 12:40:00) [5]

> надо прописать до начало вычислений?
А это как логика твоей программы построена. Если у тебя обязательно должна быть запятая, то при старте программы. А если только для вычислений, то можнои перед ними, а после них восстанавливать.

Reindeer Moss Eater ©   (12.04.06 12:23) [3]
весело будет, если пробел попадется :)


Reindeer Moss Eater   (2006-04-12 12:23:00) [6]

for ..... do
if not (SomeString[i] in ['0' .. '9']) and (SomeString[i] <> DecimalSeparator) then
 SomeString[i] := DecimalSeparator;


Officeman   (2006-04-12 12:16:00) [7]

т.е.  это:  

DecimalSeparator := '.' или DecimalSeparator := ','

надо прописать до начало вычислений? или при создании формы?


Старик   (2006-04-12 08:28:00) [8]

DecimalSeparator := '.' или DecimalSeparator := ','
Как тебе надо


Наверх

Титульная страница Поиск, карта сайта Написать письмо