为什么会could not obtain ole control window handle

Question

终于又开帐了，问个问题吧!
  TMy = class(TCustomPanel)
  private
    Web: TDirectSS;
  public
    constructor Create(AOwner: TComponent);override;
    destructor Destroy;override;
  end;
constructor TMy.Create(AOwner: TComponent);
var
  dc: HDC;
begin
  inherited Create(AOwner);
  Web := TDirectSS.Create(nil);
  dc := GetDC(Web.Handle);
  BitBlt(self.Canvas.Handle,0,0,100,100,dc,0,0,SRCCOPY);
  ReleaseDC(Web.Handle, dc);
end;var
a: TMy
begin
  a := TMy.Create(self);
end;
其中 TDirectSS 是微软的一个activex控件"microsoft direct text-to-speech"运行时为什么提示：could not obtain ole control window handle？
顺便宣传一下我的小站：http://lincosoft.go.nease.net
上边放了我做的几个控件还有一些我写的源码，希望能给您带来帮助！

Answer 1

下面这几条涉及到窗体句柄的语句，最好在你的控件的CreateWnd，或者之后执行
  dc := GetDC(Web.Handle);
  BitBlt(self.Canvas.Handle,0,0,100,100,dc,0,0,SRCCOPY);
  ReleaseDC(Web.Handle, dc);