Компонент WebBrowser, работа с Flash-видео

[Angel of Live]

Итак, умы человечества, помогайте! Возник один огромный вопрос, который никак не получается решить.

Что мы имеем:
1) Delphi 7.0
2) Расположенный на форме компонент WebBrowser
3) Страницу HTML (допустим page.html) с текстом:

<iframe title="YouTube video player" class="youtube-player" type="text/html" width="480" height="390" src="http://www.youtube.com/embed/txPLFivNNXs?rel=0" frameborder="0"></iframe>

4) Кнопку "Открыть", которая выполняет для WebBrowser команду WebBrowser.Navigate('page.html').

Что происходит:
По нажатии кнопки "Открыть" WebBrowser загружает видео с YouTube (видео в примере взято случайное).
Далее в компоненте WebBrowser автоматически создается iframe область, в которую встраивается Adobe Flash Player.

Вопрос:
Как программно выяснить, какая часть видео уже проигралась, и какую часть видео проиграть осталось (ну или хотя бы, сколько длится само видео)? Пояснение - это нужно для того, чтобы после окончания воспроизведения выбрать следующее видео.

Сколько голову не ломал, сколько google.ru не перерыл... толку никакого.

Дополню лишь одно: через сам WebBrowser.OleObject и т.д. ничего не получится однозначно.
Можно попробовать через SendMessage, ибо Handle открытого FlashPlayer'а получить легко, но нужно знать какие параметры нужно пересылать...

[BOBAH13]

Сообщение от Angel of Live

Как программно выяснить, какая часть видео уже проигралась, и какую часть видео проиграть осталось (ну или хотя бы, сколько длится само видео)? Пояснение - это нужно для того, чтобы после окончания воспроизведения выбрать следующее видео.

Сколько голову не ломал, сколько google.ru не перерыл... толку никакого.

Создаете свою флешку (.swf файл). В нее интегрируете плеер youtube, если есть Youtube API то с их помощью получаете нужные вам данные о ролики и другую информацию, т.е. обращаясь к flash player напрямую во Flex к примеру. Далее, встраиваете через ActiveX Flash Player в свою программу, в который загружаете LoadMovie и т.д. свой .swf файл. Далее, как общаться с .swf файлом, уже думаю самостоятельно найдете информацию, т.е. сможете через уже свои API (так сказать, ну функции в своем .swf) обращаться из кода в delphi.

Как то так.

[Angel of Live]

Правда у меня проблема несколько другая, более корректно задам вопрос.
Видео находится не в YouTube, а на сайте Vkontakte.
Ну и содержимое тега <iframe> будет соответственно, например:

<iframe src="http://vkontakte.ru/video_ext.php?oid=-9883830&id=112384210&hash=b809052aed7d3a49" width="607" height="360" frameborder="0"></iframe>

Сообщение от BOBAH13

Создаете свою флешку (.swf файл). В нее интегрируете плеер youtube

И как то я не особо понял, о каком YouTube плеере идет речь, и есть ли аналог для Vkontakte?

Единственное что я нашел - это Vkontakte API, но это не подходит в моей ситуации, потому что среди описанного там нет функции, отображающей длину видео и номер текущего кадра.