Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2004.06.06;
Скачать: [xml.tar.bz2];

Вниз

Клик по объекту в WebBrowser е   Найти похожие ветки 

 
Сережа550 ©   (2004-04-19 13:01) [0]

Уважаемые знатоки, помогите, пожалуйста разобраться с такой ситуацией:
Есть WebBrowser. В событии OnDocumentComplete идет поиск объектов загруженной страницы. Привожу код:

procedure TBrowser.WebBrowserDocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);
var
I:Integer;
iDoc :IHtmlDocument2;
iDisp: IDispatch;
iElement:IHTMLElement;
iObjectElement:HTMLObjectElement;
begin
iDoc:=(pDisp as IWebBrowser2).Document as IHtmlDocument2;
for I := 1 to iDoc.All.Length do
   begin
     iDisp:=iDoc.All.Item(Pred(I),0);
     iDisp.QueryInterface(IHTMLElement, iElement);
     if (iElement.TagName = "OBJECT") then
       begin
         iElement.QueryInterface(iHtmlObjectElement,iObjectElement);
         If iObjectElement.classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" then //В данном случае ищутся Flash-баннеры
           begin
             {!!!!!!}
           end;
       end;
   end;
end;


Возможно ли у iHTMLObjectElement"а взять его дескриптор и программно кликнуть по объекту?
Что-то вроде:
var
CurObj: THandle;
iObjElement:iHTMLElement;
begin
CurObj:=iObjElement.Handle;
PostMessage(CurObj, WM_LBUTTONDOWN, 0, MAKELPARAM(0,0));
PostMessage(CurObj, WM_LBUTTONUP, 0, MAKELPARAM(0,0));
end;


Естественно, вышеприведенный код не работает, потому что хендла, вроде, у объекта нет...

Вообщем, возможно ли каким-то образом кликнуть левой кнопкой мышки по найденному объекту (желательно с заданными координатами относительно этого объекта)?


 
nikkie ©   (2004-04-19 13:25) [1]

(... as IHTMLElement).click;


 
Сережа550 ©   (2004-04-19 14:08) [2]

Пробовал, процедура Click почему-то не работает на flash-объектах. Я так понял, она работает только на кнопках...


 
nikkie ©   (2004-04-19 19:35) [3]

вообще-то про IHTMLElement::click написано
Simulates a click by causing the onclick event to fire.
то есть если прицеплен скрипт в onclick, то он сработает.

мне кажется флеши лучше перебрать просто как детей эксплореровского окна с помощью EnumWindows, проверяя их WndClass. только потом аккуратно проверить на разных версиях IE, мне помнится, что окошки IE имеют немного отличную иерархию на разных версиях.


 
Сережа550 ©   (2004-04-20 10:53) [4]

Спасибо. Мысль хорошая... Перебрать окна и послать им комманды еще можно, но как через EnumChildWindows получить хендлы дочерних окон и положить их в массив? Я в этом не особо разбираюсь... Сейчас отдельным вопросом спрошу насчет этого.



Страницы: 1 вся ветка

Форум: "Сети";
Текущий архив: 2004.06.06;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.033 c
4-1083324478
Unicode
2004-04-30 15:27
2004.06.06
Keyboard Layout


3-1084564357
Mike Kouzmine
2004-05-14 23:52
2004.06.06
Ошибка в ХП


14-1084962548
Романов Р.В.
2004-05-19 14:29
2004.06.06
Покритикуйте код


14-1085293547
Vitas2
2004-05-23 10:25
2004.06.06
как добавить программу на download.com?


1-1085669662
IceClimber
2004-05-27 18:54
2004.06.06
Help me!!! Не могу очистить TList (TList.Clear-но память прибавл)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский