Вниз
Скачать: CL | DM;

Работа с браузером   Найти похожие ветки 

← →
Viktor   (2012-05-22 09:58) [0]

Задача такая. В браузере с периодичностью в 30 секунд меняются показания(цифры). Надо с помощью Delphi 7 снимать эти показания и записывать в текстовый файл. Как это можно реализовать?


← →
ProgRAMmer Dimonych ©   (2012-05-22 10:40) [1]

Принципиально в браузере? Или на странице, которую можно подгрузить Delphi-программой?


← →
Rockvik   (2012-05-22 13:01) [2]

Не принципиально. Можно и с подгруженной страници.  Это даже лучший вариант.


← →
ProgRAMmer Dimonych ©   (2012-05-22 13:12) [3]

1. Можно попробовать копать в сторону TWebBrowser. Подгружать с его помощью страницу, анализировать полученное.

2. Если не надо отображать саму страницу, можно загружать её самостоятельно (сокеты или TIdHTTP, например), находить в ней нужную информацию, дальше аналогично.


← →
Rockvik   (2012-05-22 13:26) [4]

Спасибо. Попробую.


← →
AV ©   (2012-05-22 13:46) [5]

для старта, пример через WB

 TForm1 = class(TForm)
   WebBrowser1: TWebBrowser;
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation
uses mshtml;
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
 HtmlDocument: IHtmlDocument2;
 HtmlElement: IHtmlElement;
 s : String;
 n1, n2: Integer;
begin
 WebBrowser1.Navigate("http://delphimaster.net/view/2-1337666296/");
 repeat
   Application.ProcessMessages;
 until not(WebBrowser1.Busy);
 HtmlDocument := WebBrowser1.Document as IHtmlDocument2;
 htmlElement :=HtmlDocument.body;
 s := htmlElement.innerText;
 n1 := Pos("[D7, XP]", s);
 n2 := Pos("âåðñèÿ äëÿ ïå÷àòè", s);
 s := Copy(s, n1, n2-n1);
 ShowMessage( trim(s) );
end;


← →
Медвежонок Пятачок ©   (2012-05-22 14:34) [6]

извращенные извращенцы.

ixmlhttprequest


← →
ProgRAMmer Dimonych ©   (2012-05-22 14:47) [7]

Тогда уж заодно для полноты можно WinInet API упомянуть. Так, кажись, называлось :)


← →
Омлет ©   (2012-05-22 15:00) [8]


> Медвежонок Пятачок ©   (22.05.12 14:34) [6]
> извращенные извращенцы.ixmlhttprequest

+1. Про REST в нашей деревне не слышали.


← →
Давайте будем жрать!   (2012-05-22 16:04) [9]


> ProgRAMmer Dimonych ©   (22.05.12 14:47) [7]
Отличная штука. Хотя, пожалуй, [6] потребует меньше телодвижений.


← →
antonn ©   (2012-05-23 00:47) [10]

а если эти цифры меняются скриптом?


← →
Медвежонок Пятачок ©   (2012-05-23 08:49) [11]

если скриптом, то не нужен не только браузер, но и делфи не нужен.
берем алгоритм и сразу создаем файл данных по нему.



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.055 c
4-1258417192
мурзик
2009-11-17 03:19
2013.03.22
Как определить что за изменения произошли в директории?


15-1341331433
Никто ...
2012-07-03 20:03
2013.03.22
Вторничная даже не задача)))


15-1328560202
Юрий
2012-02-07 00:30
2013.03.22
С днем рождения ! 7 февраля 2012 вторник


6-1261978289
Tornado
2009-12-28 08:31
2013.03.22
Отправка почты через MS Exchange сервер


15-1341300187
brother
2012-07-03 11:23
2013.03.22
Амуниция Первой Мировой Войны




   Наверх