Скачать: CL | DM;

IWebBrowser2 из webbrowser1.document.frames.item(i)   Найти похожие ветки 

← →
Johnnnn   (2009-09-25 09:58) [0]

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

---

← →
Johnnnn   (2009-09-25 10:56) [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;

---

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

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.013 c