VPF::CppWebBrowser - Форум программистов

Kirgston

Дата 18.1.2011, 00:28 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 792
Регистрация: 24.12.2007

Репутация: 2
Всего: 2

Доброго времени суток! Собственно при работе с ним у меня возник вопрос как убрать Бордер Стайл. Но в методах не нашел ничего похожего. Может знатоки поделятся как они это исправляют? =)

oldcode

Дата 18.1.2011, 07:47 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 116
Регистрация: 8.10.2010

Репутация: 0
Всего: 0

http://www.delphidabbler.com/articles?article=18

Kirgston

Дата 18.1.2011, 09:27 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 792
Регистрация: 24.12.2007

Репутация: 2
Всего: 2

Цитата(oldcode @ 18.1.2011, 07:47

)

http://www.delphidabbler.com/articles?article=18

Неа не то. В Builder XE даже нету метода Document . Причем я и гуглил уже =) ничего умного не нашел, потому запостил тут

oldcode

Дата 18.1.2011, 10:18 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 116
Регистрация: 8.10.2010

Репутация: 0
Всего: 0

Цитата(Kirgston @ 18.1.2011, 09:27)

В Builder XE даже нету метода Document.

Да? http://edn.embarcadero.com/article/26729
Тут смотрел: http://www.progz.ru/t8530/
http://www.progz.ru/t21617/
http://delphi.pisem.net/index.htm?faq/webbrowser_with_ui.htm ?

Kirgston

Дата 18.1.2011, 12:32 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 792
Регистрация: 24.12.2007

Репутация: 2
Всего: 2

Чуток протупил с Документом. Не то имел ввиду.

Код


                IHTMLDocument2 *lpHtmlDocument = NULL;
                Browser->Document->QueryInterface(IID_IHTMLDocument2, (LPVOID*) &lpHtmlDocument);
                IHTMLElement *lpBodyElm;
                IHTMLBodyElement *lpBody;
                lpHtmlDocument->get_body(&lpBodyElm);
                lpHtmlDocument->Release();
                lpBodyElm->QueryInterface(IID_IHTMLBodyElement,(void**)&lpBody);
                lpBodyElm->Release();

Но как отсюда сделать что то типа

Код


Element.style.borderStyle := 'none';

В упор не пойму -_- ибо ни стайла нету ни бордера нету

oldcode

Дата 18.1.2011, 15:32 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 116
Регистрация: 8.10.2010

Репутация: 0
Всего: 0

если речь об этом

Код

procedure TForm1.WBDocumentComplete(Sender: TObject; 
 const pDisp: IDispatch; var URL: OleVariant); 
var 
 Doc : IHTMLDocument2; 
 Element : IHTMLElement; 
begin 
 Doc := IHTMLDocument2(TWebBrowser(Sender).Document);
 if Doc = nil then Exit;
 Element := Doc.body;
 if Element = nil then Exit;
 Element.style.borderStyle := 'none';
end;

- то не эти ли строчки

Код

Element := Doc.body;
 if Element = nil then Exit;
 Element.style.borderStyle := 'none';

Kirgston

Дата 18.1.2011, 15:42 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 792
Регистрация: 24.12.2007

Репутация: 2
Всего: 2

Об этом я и говорю. Если посмотрите то нету там таких методов

oldcode

Дата 18.1.2011, 17:47 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 116
Регистрация: 8.10.2010

Репутация: 0
Всего: 0

Люди же как-то делают ... smile

может, речь идет о body и border из html ?
http://bbs.vbstreets.ru/viewtopic.php?f=1&...698&start=0
http://forum.sources.ru/index.php?showtopic=210703&hl=

Rrader

Дата 19.1.2011, 09:50 (ссылка)

(нет голосов)

Загрузка ...

Inspired =)

Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

Репутация: 13
Всего: 191

Код


void __fastcall TForm1::Button1Click(TObject *Sender)
{
    Variant Document, body, style;
    Document = CppWebBrowser1->OleObject.OlePropertyGet("Document");
    if (!VarIsClear(Document))
    {
        body = Document.OlePropertyGet("body");
        style = body.OlePropertyGet("style");
        style.OlePropertySet("borderStyle", "none");
    }
}

--------------------

Let's do this quickly!
Rest in peace, Vit!

ProgV

Дата 20.3.2012, 16:35 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 7
Регистрация: 20.3.2012

Репутация: нет
Всего: нет

Товарищи! Помогите! Разрабатываю браузер. Хочу запрограммировать запрет на вызов страниц. Пишу, значит так:

Код


void __fastcall TForm1::CppWebBrowser1BeforeNavigate2(TObject *Sender,
      LPDISPATCH pDisp, Variant *URL, Variant *Flags,
      Variant *TargetFrameName, Variant *PostData, Variant *Headers,
      VARIANT_BOOL *Cancel)
{
  Form2->Edit1->Text = URL->operator AnsiString();
  if(URL->operator AnsiString()!= Form2->ComboBox1->Text)
    MessageDlg("Данный сайт запрещен для просмотра.\n"
               "Спросите разрешения у родителей", mtWarning,
               TMsgDlgButtons()<<mbOK, 0);
  CppWebBrowser1->Stop();
  dc = 0;
}

А этот CppWebBrowser, стволочь, все равно загружается, несмотря на этот Stop()

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »