+\81`TWebBrowser\82Ì\9d|\81`
+ Delphi\82Ì\83I\81[\83g\83\81\81[\83V\83\87\83\93\82Í\82í\82©\82è\93ï\82\81A\8bC\82ð\94²\82\82Æ\8eQ\8fÆ\83J\83E\83\93\83g\82ª\8c¸\82è\82·\82¬\82Ä\82µ\82Ü\82Á\82½\82è\81A\8ec\82Á\82Ä\82µ\82Ü\82¢\82Ü\82·\81B
+ eggcake\82ª\92²\82×\82½\82±\82ê\82ç\82ð\89ñ\94ð\82·\82é\95û\96@\82ð\82±\82±\82É\8f\91\82¢\82Ä\82¨\82«\82Ü\82·\81B
+
+ \90³\82µ\82¢\95û\96@
+ if Assigned(WebBrowser.ControlInterface.Document) then;
+ OleVariant := OleVariant(WebBrowser.Document);
+ OleVariant := WebBrowser.OleObject.Document;
+ IHTMLDocument2 := WebBrowser.ControlInterface.Document as IHTMLDocument2;
+ IHTMLDocument2 := IDispatch(OleVariant(WebBrowser.Document)) as IHTMLDocument2;
+ IHTMLDocument2 := IDispatch(WebBrowser.OleObject.Document) as IHTMLDocument2;
+
\81E\83\8c\83X\91\97\90M\83G\83f\83B\83^\82Ì\81u\91\97\90M\94 \82Ö\95Û\91¶\81v\82ª\96¢\8eÀ\91\95\81B
\81@\82æ\82Á\82Ó\82¡\81`\93I\82É\82Í\96³\82\82Ä\82à\82¢\82¢\82Æ\8ev\82¤\81B