Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Интернет и сети
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 24.11.2009, 17:49
lilden_89 lilden_89 вне форума
Прохожий
 
Регистрация: 24.11.2009
Сообщения: 4
Репутация: 10
По умолчанию Помогите пожалуйста

Помогите пожалуйста.... Как сделать так чтобы чаcть HTML кода c определенного URL отображалась в поле Tmemo. Именно определенная часть, а не весь код. Чтобы все это происходило при нажатии кнопки (например получить статистику). Delphi 7.
Ответить с цитированием
  #2  
Старый 24.11.2009, 18:17
Phedor Phedor вне форума
Начинающий
 
Регистрация: 28.02.2008
Сообщения: 118
Репутация: 21
По умолчанию

Получи страничку, а затем удаляй не нужное. Например
Код:
Buffer := idHTTP1.Get('http://www.site.ru/page1.php'); // Получаем
System.Delete(Buffer, 1, pos('<statistic>', Buffer)-1); // "Удаляем до"
System.Delete(Buffer, pos('</statistic>', Buffer)+length('</statistic>')-1); // "Удаляем после"
Memo1.Text := Buffer; // Пихаем в мемо
Ответить с цитированием
  #3  
Старый 24.11.2009, 23:08
lilden_89 lilden_89 вне форума
Прохожий
 
Регистрация: 24.11.2009
Сообщения: 4
Репутация: 10
По умолчанию

Цитата:
Сообщение от Phedor
Получи страничку, а затем удаляй не нужное. Например
Код:
Buffer := idHTTP1.Get('http://www.site.ru/page1.php'); // Получаем
System.Delete(Buffer, 1, pos('<statistic>', Buffer)-1); // "Удаляем до"
System.Delete(Buffer, pos('</statistic>', Buffer)+length('</statistic>')-1); // "Удаляем после"
Memo1.Text := Buffer; // Пихаем в мемо

undeclared identifier: 'buffer'
undeclared identifier: 'idHTTP'
Ответить с цитированием
  #4  
Старый 25.11.2009, 09:26
Аватар для NIch
NIch NIch вне форума
Продвинутый
 
Регистрация: 02.06.2008
Адрес: Бендеры ПМР
Сообщения: 754
Репутация: 2446
По умолчанию

В разделе Uses подключи нужные юниты, или кинь на форму нужные компоненты...
В Uses добавь idHTTP...по моему...
А скорее всего....
Найти компонент idHTTP можно на вкладке Indy Clients...
__________________
В начале был Бит, потом Байт и только потом появилось Слово...

Последний раз редактировалось NIch, 25.11.2009 в 09:29.
Ответить с цитированием
  #5  
Старый 25.11.2009, 10:23
lilden_89 lilden_89 вне форума
Прохожий
 
Регистрация: 24.11.2009
Сообщения: 4
Репутация: 10
По умолчанию

Incompatible types: 'TMemoryStream' and 'String'

в строчке System.Delete(Buffer, 1, pos('<statistic>', Buffer)-1)
Ответить с цитированием
  #6  
Старый 25.11.2009, 13:39
lilden_89 lilden_89 вне форума
Прохожий
 
Регистрация: 24.11.2009
Сообщения: 4
Репутация: 10
По умолчанию

Вот фрагмент кода странички
Надо сделать отображение баланса в Tmemo

# Сегодня
today: 2009-11-25

# Клиент
client: Петр Петров

# Текущий баланс
balance: -7351.13


# Время последнего съёма статистики
charge_time: 2009-11-25 13:11:23
Ответить с цитированием
  #7  
Старый 25.11.2009, 13:39
lilden_89 lilden_89 вне форума
Прохожий
 
Регистрация: 24.11.2009
Сообщения: 4
Репутация: 10
По умолчанию

Заранее спасибо!)))
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 17:55.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025