TWebBrowser'de ReadyState olayının aynısı yani sayfanın yüklenmesini bekleme olayını nasıl TWebBrowser'de Java script komutu uygulanırken bekletebilirim ?
Aşağı kodlar yardımı ile projemdeki Javascript komutlarını calıstırabiliyorum.
Kod: Tümünü seç
procedure ExecuteScript(doc: IHTMLDocument2; script: string; language: string) ;
begin
if doc <> nil then
begin
if doc.parentWindow <> nil then
doc.parentWindow.ExecScript(script, Olevariant(language)) ;
end;
end;
//Kullanımı
ExecuteScript(WebBrowser1.Document as IHTMLDocument2, Script, 'javascript');