У меня небольшая проблема с IHtmlElementCollection, используемой в Delphi XE2. Мой документ выглядит примерно так, и я загружаю его в TWebBrowser.
<!DOCTYPE html>
<html>
<head>
<title>Test av skjema</title>
<script type="text/javascript" src="Header.js" ></script>
<style>
body{ font-family: 'Segoe UI'; font-size: 9pt; }
table{ background-color: silver; width=98%; }
td{ background-color: white; vertical-align: top; padding: 2px; }
.fullWidth{ width: 100%; border: 0px solid white; }
.noFrame{ border: 0px solid white; overflow: hidden; width=100%; }
.Header{ font-weight: bold; }
.Question{ font-size: 9pt }
.HelpText{ font-size: 8pt; color: navy; }
</style>
</head>
<body>
<form>
...
</form
</body>
</html>
Когда я пытаюсь перебрать все элементы в документе, используя интерфейс IHtmlDocument2, свойство «all» будет содержать только элементы вплоть до скрипта, всего 5 объектов IHtmlElement. После этого больше нет элементов для поиска.
Однако при удалении тега:
<script type="text/javascript" src="Header.js" ></script>
итератор снова найдет все элементы файла, что намного больше. Кто-нибудь знает, почему это происходит?