Проблема в кодировке? Делфи

[Artsiom]

Доброго времени суток.
Суть проблемы в нижеследующем.
Почти доделал парсер для игрушки одной. Там нужно из кода страницы выделить пару чисел.
Большие числа записываются так: 1 234 567
Есть одно НО, нужно убрать "пробелы" между цифрами.
Теперь конкретно, делфи(memo), блокнот, исходный код и т.п. определяют эти "пробелы" как пробелы.
Когда собираюсь удалять их функциями AnsiReplaceStr/StringReplace/самопальная как оказывается, что это не пробелы потому, что их не удаляет ни что.
Решил оставить пока так и попытаться вставить эти числа в топик форума игры.
Получилось: 1?234?567
Теперь я не знаю что делать. Мне ещё нужно будет с этими числами работать, но в integer перевести по понятной причине не могу.
Помогите пожалуйста.

[Utkin]

Проходишь в цикле по каждому символу и формируешь новую строку. Условием для проверки будет обязательно наличие цифры, для этого удобно использовать множества. А только потом уже перегоняешь в число.

[Stilet]

А я бы ради интереса посмотрел в НЕХ редакторе что это за символ. Возможно просто табуляция.

[Serge_Bliznykov]

я бы тоже посмотрел, что это за символы там спрятались за пробелами.
Вариант - можно сохранить в файл и посмотреть hex-редактором.
А можно и в delphi заглянуть, что это за символы.
вот так, например:

var S, SRez : string;
 i : integer;
begin
  S := '1'#13'234'#9#9'567'; {вместо этого занесите в  S вашу строку с цифрами со страницы}
  SRez := '';
  for i:=1 to Length(S) do
    SRez := SRez + ' '+IntToHex(ord(S[i]),4);

  Edit1.Text := SRez; {выведите полученную строку с кодами для просмотра/анализа}

end;

[Vapaamies]

Неразрывные пробелы, скорее всего.

[Artsiom]

Сообщение от Serge_Bliznykov

я бы тоже посмотрел, что это за символы там спрятались за пробелами.

Посмотрел по вашему коду, из числа 978 874 получилось 0039 0037 0038 00A0 0038 0037 0034
00А0, что это за пакость такая?
Конечно пройти числа самопальной функцией можно, но программа и так не блещет скоростью, даже не представляю сколько она будет работать не на стационарном, а на нетбуке...

[Serge_Bliznykov]

Сообщение от Artsiom

Посмотрел по вашему коду, из числа 978 874 получилось 0039 0037 0038 00A0 0038 0037 0034
00А0, что это за пакость такая?
Конечно пройти числа самопальной функцией можно, но программа и так не блещет скоростью, даже не представляю сколько она будет работать не на стационарном, а на нетбуке...

Поздравляю Vapaamies, он телепатировал верно.

код 0x00A0 = 160 - это Неразрывный пробел     (например, тыц)

а зачем Вам что-то писать.
достаточно:
AnsiReplaceStr / StringReplace и заменить символ #160 на '' (пустую строку)
или даже так:

while Pos(#160, s)>0 do Delete(s, Pos(#160, s), 1);

что же касается быстродействия, то поверьте мне, за одну миллисекунду процессов обработает сотню подобных циклов.
У Вас тормоза в другом месте и подобная обработка сильно программу не замедлит!

[Utkin]

AnsiReplaceStr / StringReplace и заменить символ #160 на '' (пустую строку)

Я бы рекомендовал свой вариант. Пес его знает что и как-там формируется. Сегодня пробел, завтра табуляция, да и более чем уверен расширенных тестов ТС не проводил и потому даже без апгрейдов вполне вероятны случаи когда все по закону и между цифрами не пробел, а что-то такое есть. А цифры в большинстве кодировок выглядят как цифры и потому счастье очень даже может быть.

[Artsiom]

Спасибо!!!
А зачем делать расширенные тесты? Прога очень узкоспециализированная, работает со множеством однотипных страничек.
А тормозит, догадываюсь из-за чего.
Использовать невидимые мемо в качестве переменных, что бы скроить чужие куски кода, думаю не есть хорошо...

[Utkin]

Использовать невидимые мемо в качестве переменных, что бы скроить чужие куски кода, думаю не есть хорошо...

Конечно. Невидимый Мемо это TStringList (на случай, если Вы автор программы).