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

Вниз

"105.00" и "105,00" Как иcправить этот глюк?   Найти похожие ветки 

 
Officeman   (2006-04-12 07:58) [0]

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

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

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


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

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


 
Officeman   (2006-04-12 12:16) [2]

т.е.  это:  

DecimalSeparator := "." или DecimalSeparator := ","

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


 
Reindeer Moss Eater ©   (2006-04-12 12:23) [3]

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


 
Desdechado ©   (2006-04-12 12:40) [4]

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

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


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


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

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


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

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

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

вписать

DecimalSeparator := ",";

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

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


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


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

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


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


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

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



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

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

Наверх




Память: 0.48 MB
Время: 0.025 c
3-1141306264
Dosfalcon
2006-03-02 16:31
2006.04.30
Извлечение системного номера записи DBF


1-1143211551
Германн
2006-03-24 17:45
2006.04.30
Координаты SubItem в TListView


1-1141997474
Wolferio
2006-03-10 16:31
2006.04.30
управление внешней програмой


15-1144151706
alles
2006-04-04 15:55
2006.04.30
По Аске получил, забавно


2-1144773545
vasya2006
2006-04-11 20:39
2006.04.30
пароли и Excel