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

Получить выделенные объекты из TWebBrowser

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

procedure TForm1.Button1Click(Sender: TObject);
 begin
   if Webbrowser1.OleObject.Document.Selection.type = "Control" then
   begin
     if Webbrowser1.OleObject.Document.Selection.CreateRange.CommonParentElement.tagName =
       "IMAGE" then
       ShowMessage("An Image is selected");
   end
   else
   begin
     if Webbrowser1.OleObject.Document.Selection.createRange.Text = "" then
       ShowMessage("Nothing is selected - ");
   end;
 end;

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


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

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


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