Главная страницаОбратная связьКарта сайта

Перевести TWebBrowser в режим редактирования

Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch

{ 
  You can use the designMode property to put the Webbrowser 
  into a mode where you can edit the current document. 
}

 uses
   MSHTML_TLB;

 procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
   const pDisp: IDispatch; var URL: OleVariant);
 var
   CurrentWB: IWebBrowser;
 begin
   CurrentWB := pDisp as IWebBrowser;
   (CurrentWB.Document as IHTMLDocument2).DesignMode := "On";
 end;

 procedure TForm1.Button1Click(Sender: TObject);
 begin
   WebBrowser1.Navigate("?wurl=wp.netscape.com/assist/net_sites/example1-F.html")
 end;

Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация по разработке на Delph - "Перевести TWebBrowser в режим редактирования", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!
   


Copyright © 2008 - 2024 Дискета.info