Discussion :

[maetela]

Bonjour je fais une fonction pour executer et modifier de l'html avec du javascript dans delphi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
procedure TForm1.javascript(doc: IHTMLDocument2; script: string);
begin
   if doc <> nil then
   begin
     if doc.parentWindow <> nil then
       doc.parentWindow.ExecScript(script, Olevariant('javascript')) ;
   end;
end;

et j'obtiens une erreur 80020101 est ce que quelqu'un sait comment on peut resoudre cette erreur??
Merci d'avance