Получение информации с сайта

[Krasiosoft]

Там вроде нужно было делать так:

Chromium1.Browser.GetMainFrame.ViewSource

А не проще будет просто узнать запрос, который отправляет JS и отправлять его, чтоб получить эти данные?

Можете дать ссылку на сайт? Попробую узнать запрос.

[Lorden]

Сообщение от Krasiosoft

Там вроде нужно было делать так:

Chromium1.Browser.GetMainFrame.ViewSource

А не проще будет просто узнать запрос, который отправляет JS и отправлять его, чтоб получить эти данные?

Можете дать ссылку на сайт? Попробую узнать запрос.

Спасибо код работает! А случайно не знаете как сделать чтобы html выводило не в документ а в переменную?
Сайт https://www.tradingview.com/chart/?q=FX%3AEURUSD1222
Задача вывести в программу курс валюты EURUSD и уже от этого курса планирую строить график.

[Krasiosoft]

Для получения курса валюты EURUSD простого запроса не хватит, нужно будет использовать WebSocket, т.к. он получает с помощью него данные.

Сообщение от Lorden

как сделать чтобы html выводило не в документ а в переменную?

Я может вопроса не понял, но посмотрите, какой тип данных возвращает функция ViewSource, создайте переменную этого типа и записывайте туда.

[Lorden]

Сообщение от Krasiosoft

Для получения курса валюты EURUSD простого запроса не хватит, нужно будет использовать WebSocket, т.к. он получает с помощью него данные.

Попробую покапать в сторону WebSocket.

Сообщение от Krasiosoft

Я может вопроса не понял, но посмотрите, какой тип данных возвращает функция ViewSource, создайте переменную этого типа и записывайте туда.

Chromium1.Browser.GetMainFrame.View Source- как я понимаю это процедура, и она не возвращает никакого значения а просто при её вызове создает Word-овский файл и записывает туда html страницы открытой в Chromium-е.

[Krasiosoft]

Я сам не работал с Chromium, поэтому не смогу подсказать, но функция, которая вернет исходный код страницы, должна быть. Не думаю, что там такой нету.

Документацию бы найти где-то...

[Lorden]

А возможно ли каким либо образом отредактировать саму процедуру

Chromium1.Browser.GetMainFrame.View Source

А не подскажите какую документацию почитать чтобы выполнить мою задачу с помощью WebSocket?

И если не трудно скажите что означает данный код:

procedure StringVisitor(const str: ustring);
begin
  //str is the SourceHtml showmessage(str);
end;

function GetSourceHTML: string;
var CefStringVisitor:ICefStringVisitor;
begin CefStringVisitor := TCefFastStringVisitor.Create(StringVisitor); Chromium1.Browser.MainFrame.GetSource(CefStringVisitor);
end;

[Krasiosoft]

Не думаю, что через WebSocket будет проще сделать это, т.к. нужно будет изучать протокол обмена данными. Единственный плюс от этого будет, что не нужно использовать целый движок браузера.

Код, который Вы привели, скорее всего, берет исходный код страницы на основе класса ICefStringVisitor, в который была установлена функция StringVisitor. Но в каком виде попадут данные в функцию StringVisitor - не знаю, нужна документация по функции GetSource, и по классу ICefStringVisitor.

Попробуйте какой-то из этих вариантов еще:
1)

    procedure MyProc(const src : ustring)
    begin
        Memo1.text := src;
    end;
    ...
    Chromium1.Browser.GetMainFrame.GetSourceProc(MyProc);

2)

    Memo1.text := Chromium1.Browser.GetMainFrame.Source;

[Lorden]

Сообщение от Krasiosoft

Не думаю, что через WebSocket будет проще сделать это, т.к. нужно будет изучать протокол обмена данными. Единственный плюс от этого будет, что не нужно использовать целый движок браузера.

Код, который Вы привели, скорее всего, берет исходный код страницы на основе класса ICefStringVisitor, в который была установлена функция StringVisitor. Но в каком виде попадут данные в функцию StringVisitor - не знаю, нужна документация по функции GetSource, и по классу ICefStringVisitor.

Попробуйте какой-то из этих вариантов еще:
1)

    procedure MyProc(const src : ustring)
    begin
        Memo1.text := src;
    end;
    ...
    Chromium1.Browser.GetMainFrame.GetSourceProc(MyProc);

2)

    Memo1.text := Chromium1.Browser.GetMainFrame.Source;

Огромнейшее спасибо! работает код:

    procedure MyProc(const src : ustring)
    begin
        Memo1.text := src;
    end;
    ...
    Chromium1.Browser.GetMainFrame.GetSourceProc(MyProc);