Вниз
Скачать: 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.952 c
15-1351951907
brother
2012-11-03 18:11
2013.03.22
Антивирус на win2008 x64


2-1338534766
leklerk
2012-06-01 11:12
2013.03.22
Вторичная форма в центре главной


15-1347827405
Юрий
2012-09-17 00:30
2013.03.22
С днем рождения ! 17 сентября 2012 понедельник


1-1295204106
IPranker
2011-01-16 21:55
2013.03.22
Является ли многоугольник выпуклым?


2-1334607403
Непомнящий
2012-04-17 00:16
2013.03.22
Кончается память




   Наверх