Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

IWebBrowser2 из webbrowser1.document.frames.item(i)


Johnnnn ©   (2009-09-25 09:58:00) 

Как получить интерфейс IWebBrowser2 из webbrowser1.document.frames.item(i)
ато пытаюсь вытащить activeelement но невыходит прочитал что сперва нужно вытащить Iwebbrowser2 а потом уже можно будет.


Johnnnn   (2009-09-25 10:56:00) [1]

такс как вытащить нашел но вот activeelement все равно добыть неудаеться
function GetFrame(FrameNo: Integer): IWebbrowser2;
var
  OleContainer: IOleContainer;
  enum: IEnumUnknown;
  unk: IUnknown;
  Fetched: PLongint;
begin
  {while Webbrowser1.ReadyState <> READYSTATE_COMPLETE do
    Forms.Application.ProcessMessages;
  if Assigned(Webbrowser1.document) then }
  //begin
    Fetched := nil;
    OleContainer := form1.Webbrowser1.Document as IOleContainer;
    OleContainer.EnumObjects(OLECONTF_EMBEDDINGS, Enum);
    Enum.Skip(FrameNo);
    Enum.Next(1, Unk, Fetched);
    Result := Unk as IWebbrowser2;
  //end else Result := nil;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо