Delphi XE2：firemonkey和IDirect3DTexture9

Question

这是我最大的问题:(如何在一些firemonkey控件上绘制IDirect3DTexture9类型的对象数据？

我可以这样填写吗？

var
   tmpTexture: IDirect3DTexture9; // for example it's not empty
   panel: TPanel;
begin
  panel.Canvas.BeginScene;
  panel.Canvas.Draw( tmpTexture, nil, nil, nil, $FFFFFFFF );
  panel.Canvas.EndScene;
end;