VPF::Расформатировка текста - Форум программистов

SkyAngel

Дата 18.9.2009, 18:23 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 36
Регистрация: 11.1.2009
Где: Беларусь, Минск

Репутация: нет
Всего: нет

Здравствуйте, программисты. Возможно тема уже изъедена, но очевидно не верно формировал запрос.
В общем суть проблемы такова: я получаю исходный код страницы (для примера - travian.ru). Однако там получаю такого рода текст (из GETа)

Код


...</td>'#$A#9#9#9'</tr>'#$A#9#9#9'<tr>
'#$A#9#9#9#9'<th> Народ:</th>'#$A#9#9#9#9'
<td>Римляне</td>'#$A#9#9#9'</tr>'#$A#9#9#9'
<tr>'#$A#9#9#9#9'<th> Альянс:</th>'#$A#9#9#9#9'
<td>-</td>'#$A#9#9#9'</tr>'#9#9#9#$A#9#9#9'<tr>
'#$A#9#9#9# 9'<th>Деревни:</th>'#$A#9#9#9#9'<td>
1</td>'#$A#9#9#9'</tr>'#$A#9#9#9'<tr>'#$A#9#9#9#9'
<th> Население:</th>'#$A#9#9#9#9'<td>115</td>'#$A#9#9#9'
</tr><tr>'#$A#9#9#9#9#9'<th>Возраст:</th>'#$A#9#9#9#9#9'
<td>18</td>'#$A#9#9#9#9'</tr><tr>'#$A#9#9#9#9#9'<th>Откуда:
</th>'#$A#9#9#9#9#9'<td>Минск</td>'#$A#9#9#9#9'</tr><tr>
'#$A#9#9#9#9'<td colspan="2" class="empty"></td>'#$A#9#9#9'
</tr>'#$A#9#9#9'<tr>'#$A#9#9#9#9'<td colspan="2"> 
<a href="spieler.php?s=1">&raquo;...

Собственно проблема в том, что пытаясь просто найти все лишние символы и удалить их - не находит некоторых символов. Мне известно, что это управляющие символы (Enter,Tab,etc.), но убрать их не могу =(. Надеюсь на вашу, эксперты, помощь.

Это сообщение отредактировал(а) SkyAngel - 18.9.2009, 18:25

Amphiluke

Дата 18.9.2009, 19:14 (ссылка)

(нет голосов)

Загрузка ...

☽

Профиль
Группа: Завсегдатай
Сообщений: 1253
Регистрация: 26.8.2009

Репутация: 5
Всего: 112

StringReplace() с флагом [rfReplaceAll] во последнем параметре не помогает?

Akella

Дата 18.9.2009, 19:21 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329

Цитата(SkyAngel @ 18.9.2009, 18:23

)

проблема в том, что пытаясь просто найти все лишние символы и удалить их - не находит некоторых символов.

Ошибка в 17 строке (с)

SkyAngel

Дата 18.9.2009, 19:30 (ссылка)

(нет голосов)

Загрузка ...

Цитата(Amphiluke @ 18.9.2009, 19:14

)

StringReplace() с флагом [rfReplaceAll] во последнем параметре не помогает?

Нет. Уже пробовал.

Цитата(Akella @ 18.9.2009, 19:21

)

Ошибка в 17 строке (с)

Извини? В какой 17-ой строке? Я не прикладывал кода программы =) . Это выдержка из исходного кода страницы. И строка длинную я разбил для более читаемого вида.

Romikgy

Дата 18.9.2009, 19:39 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 26
Всего: 146

Цитата(SkyAngel @ 18.9.2009, 18:30

)

Нет. Уже пробовал.

а покажи как?

Цитата(SkyAngel @ 18.9.2009, 18:30

)

Извини? В какой 17-ой строке? Я не прикладывал кода программы =)

во в той какую не выложил ....

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Amphiluke

Дата 18.9.2009, 19:40 (ссылка)

(нет голосов)

Загрузка ...

☽

Профиль
Группа: Завсегдатай
Сообщений: 1253
Регистрация: 26.8.2009

Репутация: 5
Всего: 112

Цитата(SkyAngel @ 18.9.2009, 19:30

)

Нет. Уже пробовал.

Я тоже. Работает.

Цитата(SkyAngel @ 18.9.2009, 19:30

)

Извини? В какой 17-ой строке?

=)))))

Keeper89

Дата 18.9.2009, 19:41 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 20
Всего: 58

Это была штука шутка, если ты не понял smile

Это сообщение отредактировал(а) Keeper89 - 18.9.2009, 20:58

--------------------

Cogito, ergo sum

Keeper's blog
CnWizards Downloads

user posted image

SkyAngel

Дата 18.9.2009, 20:15 (ссылка)

(нет голосов)

Загрузка ...

Цитата(Keeper89 @ 18.9.2009, 19:41

)

Это была штука

крутая штука =))

Цитата(Amphiluke @ 18.9.2009, 19:40

)

Я тоже. Работает.

Ты прав =). Ошибка глупая - лишние кавычки стояли…
Всем спасибо.
Тему пока что не закрываю, но помечаю как решённую. Возможно есть и другой способ. Это ведь какая-то категория символов....

Keeper89

Дата 18.9.2009, 22:25 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 20
Всего: 58

Я честно говоря без кода не вижу откуда появляются эти символы.
Вот так все прилично и без символов грузится в Memo:

Код


  Memo1.Text := Utf8ToAnsi(idHTTP1.Get('http://travian.ru'));

--------------------

Cogito, ergo sum

Keeper's blog
CnWizards Downloads

user posted image

Akella

Дата 18.9.2009, 22:38 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329

Цитата(SkyAngel @ 18.9.2009, 19:30

)

Извини? В какой 17-ой строке? Я не прикладывал кода программы =)

Будешь общаться на форумах - поймёшь. А может и нет smile

Добавлено через 1 минуту и 9 секунд

Цитата(SkyAngel @ 18.9.2009, 20:15

)

Тему пока что не закрываю, но помечаю как решённую.

А ты и не закроешь smile

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »