Какой-то косяк с Inet1.OpenUrl, гляньте на свежую голову

[Pantalone]

Проблема в том, что если при выполнении подряд нескольких OpenUrl встречается ссылка, которая не дает результата и срабатывает таймаут, то последующие OpenUrl какие-то корявые выходят, они не дают выполнить после себя GetHeader("Content-type").
Гляньте простой примерчик.
Если закомментировать строку

Код: Выделить всё

Call GetContentType("http://www.gor-net.ru/favicon.ico")

то все пучком для всех остальных сылок, а если оставить вместе с этой строкой то косяки идут.

[Хакер]

MSInet основан на WinInet? WinInet устроен из багов.

[Pantalone]

Проблему создает строка
Inet1.RequestTimeout = 7
Если ее убрать, то OpenURL ждет свои сколько там положено 17 секунд (какой-то дефолтный таймаут?) и дальше все работает как надо.
Попытался было через Execute, но там на RequestTimeout вообще ноль внимания и выжидается дефольный длинный таймаут. Как же быть-то ё-мае?

[Хакер]

Например можно использовать упомянутый WinHTTP.

[Pantalone]

Решил проблему через Execute и собственный таймер, который вызывает Cancel. Вроде работает.