Здравствуйте, Ihor Osovyak.

Спасибо за код, скопировал, раскидал все, куда нужно, и у меня началась истерика )))))))))
Я таких ошибок еще не видел, которые он выдавал,
aDoer: TOneStepSearchCondForHtmlDocWithFrames — на это ругается, говорит о что то непонятное ) хотя я это закоментировал как
type
TOneStepSearchCondForHtmlDocWithFrames = function(iDoc: IHtmlDocument2; addPrm: integer): boolean;

[Error] Unit1.pas(10): Unsatisfied forward or external declaration: 'TForm1.FinderFirstCondForHtmlDocWithFrames'

ну это еще ладно... )
uses
fIEFrames; — У меня по ходу такой библиотеки дцушной нема ))))))))))))))))))))))))))

Уже смешно?
Тупой я, что сказать...
Да это еще пол беды!!!! Сейчас вообще смеяться будете! ))

Я забыл, как функциями пользоваться, а вернее как их вызывать, и результат записывать
Псле этого, я начал писать это сообщение, и наверняка до сих пор валяюсь в приступе пароноедального смеха ))