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

ActiveX -> JavaScript   Найти похожие ветки 

← →
vir ©   (2007-04-06 11:37) [0]

День добрый - пишу ActiveX для тобрадения в HTML странице.
Вот беспокоит вопрос, как из ActiveX формы вызвать JS функцию на странице где она отображается?
Ну или как из ActiveX получить доступ к htmldocument?

---

← →
vir ©   (2007-04-06 12:29) [1]

Вобщем MSDN помог.
Вот код думаю многим поможет.


procedure TContetX.Button1Click(Sender: TObject);
var Doc:IHTMLDocument2;
   Site:IOleClientSite;
   Container:IOleContainer;
   HTMLWindow: IHTMLWindow2;
begin
Site:=Self.ActiveFormControl.ClientSite;
Site.GetContainer(Container);
Doc:=Container as IHTMLDocument2;
HTMLWindow := Doc.parentWindow;
HTMLWindow.execScript("receive("YES");", "JavaScript");
end;


ну соотвестенно функция receive должна быть объявлена в JS на странице.

---

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

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



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