![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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;