|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
18.12.2010, 01:59 | #1 |
Пользователь
Регистрация: 11.05.2010
Сообщений: 11
|
Работа с "Pos"
в общем есть один файл разрешением .txt
я с него скачиваю информацию мне нужную, при этом работает х5, но не работает х20 пример: procedure CreateAsSting(name: string); //Открытие .txt var m_list : TStringList; begin m_list := TstringList.Create; m_list.LoadFromFile(name); st := m_list.Text; m_list.Free; end; --------------------------------------------------------- a:integer; st,w:string; --------------------------------------------------------- кнопка х5 CreateAsSting('server-info.txt'); a:=pos('<div class="info">WoW Circle 3.3.5a x5<br>', st); work:=copy(st, a-66, 3); //Работает ли сервер Тут пос работает нормально..и выводит мне on кнопка х30 CreateAsSting('server-info.txt'); a:=pos('<div class="info">WoW Circle 3.3.5a x30<br>', st); work:=copy(st, a-66, 3); //Работает ли сервер в a - не записывает координаты ,получаеться нулевым символом... .txt код где должен брать: <div class=" ahx-on showt" title=""> <div class="online">2372</div> <div class="info">WoW Circle 3.3.5a x5<br><br><br><font color=green><b>Рекомендуется</b></font></div> </div> <div class=" ahx-on showt" title=""> <div class="online">469</div> <div class="info">WoW Circle 3.3.5а x30<br><br><br><font color=green><b>Рекомендуется</b></font></div> </div> |
18.12.2010, 08:35 | #2 |
кривокодер ;)
Форумчанин
Регистрация: 20.06.2008
Сообщений: 707
|
POS учитывает регистр символов... пробуйте либо использовать lowercase(), либо согратить поиск к примеру до "x5<br>" и "x30<br>"
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид} |
18.12.2010, 11:07 | #3 |
Пользователь
Регистрация: 11.05.2010
Сообщений: 11
|
|
18.12.2010, 11:12 | #4 |
кривокодер ;)
Форумчанин
Регистрация: 20.06.2008
Сообщений: 707
|
Pos ищет с начала строки. Возможно, поэтому... конкретно опиши как ты ищешь и что не получается.
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид} |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как обойти "преобразование типа из "string" в "float" невозможно" | lexluter1988 | Помощь студентам | 1 | 07.08.2010 12:23 |
"ОКРВВЕРХ", "ОКР", "ЕСЛИ". Как бы их связать. | Каравай | Microsoft Office Excel | 13 | 17.02.2010 09:53 |
при вводе на листе "магазин"- код товара появлялось "описание" товара из "склада" с "продажной ценой" | aleksei78 | Microsoft Office Excel | 13 | 25.08.2009 12:04 |
блок "cont" с права не принимает значение "margin: 10px;" которое описано в body | tabikA | HTML и CSS | 5 | 24.02.2009 21:50 |