DSPack... непонятное

[LiaSoft]

не сочтите совсем тупым, но на Delphi пишу всего год.
Вопрос 1:
Есть код проигрывания mms с использованием DSPack вещаемого через интернет.

  CoCreateInstance(CLSID_WMAsfReader, nil, CLSCTX_INPROC, IBaseFilter, FASFReader);
    (IVideoRender As IGraphBuilder).AddFilter(FASFReader, 'WMASFReader');

  // audio renderer
  CoCreateInstance(CLSID_DSoundRender, nil, CLSCTX_INPROC, IBaseFilter, FAudioRender);
    (IVideoRender As IGraphBuilder).AddFilter(FAudioRender, 'Default Audio Render');

  if (FASFReader.QueryInterface(IID_IFileSourceFilter, LFileSource) = S_OK) then
    LFileSource.Load(PWideChar(iURL), nil);

  (IVideoRender as ICaptureGraphBuilder2).RenderStream(nil, @MEDIATYPE_Video, FASFReader, nil,
    ((IVideoPanel As IVideoWindow) As IBaseFilter) );

  (IVideoRender as ICaptureGraphBuilder2).RenderStream(nil, @MEDIATYPE_Audio, FASFReader, nil,
    FAudioRender as IBaseFilter);

Определенные переменные:

  IVideoPanel : TVideoWindow;
  IVideoRender : TFilterGraph;
  FASFReader : IBaseFilter;
  FAudioRender : IBaseFilter;
  LFileSource: IFileSourceFilter;

Так вот если все это висит в одной процедуре то все работает, но перед началом проигрывания виснет секунд на 20 (Что раздражает). Я хотел этот код перенести в поток, но мне нужно чтоб с потока использовались компоненты брошеные на форму (Чтобы я мог использовать события TFilterGraph)... как это сделать? (Вопрос не риторический, просто как указать на компоненты?)

Вопрос 2:
Вот этот же код. Проблема: изображение есть, но оно в оригинальном размере и перевернуто к верх ногами (На изменение параметров TVideoWindow нет реакции).

[LiaSoft]

Ап!
Народ! Ну че сложного? Просто скажите как с потока использовать компоненты на форме!

[notHaker]

мда... DirectShow и так использует поток... Зачем исчо один?