我用下面的方法从数据库里将存储的WORD文档内容读出,然后贴在拷贝在粘贴板上,再将其粘贴在另外打开的一个WORD文档上,老是提示命令失败!请问什么原因啊?大虾们帮忙啊!!~~~~ while not Query.Eof do
  begin
    //从数据库将word文档内容取出,
    try
      STStream:=TAdoBlobStream.create(TBlobField(Query.FieldByName('stnr')),bmRead);
      STStream.position:=0;
      OleContainer1.LoadFromStream(STStream);
    except
      ShowMessage('没有试题信息或查询出错!');
      exit;
    end;        //经过测试,可以从数据库取出  OleContainer1.DoVerb(ovshow);  //显示该文档
  OleContainer1.copy;     //将文档拷贝在粘贴板上
  OleContainer1.DestroyObject;//删除对象
  wordApp.Selection.Paste;   //wordapp为另外建立打开的一个word应用程序,
在这步的时候就提示出错,说  :“命令出错”
  end;