BCB怎么打印Word文件

BCB如何打印Word文件？
如题，谢谢！

[解决办法]
用最简单的办法，实现最好的打印(用BCB调用WORD的打印功能) 
http://blog.csdn.net/hellogv/archive/2007/02/08/1505298.aspx
[解决办法]
Variant wd;
//wd=CreateOleObject("Word.application");//创建WORD实例
wd=CreateOleObject("Word.basic");//创建WORD实例

wd.Exec(Procedure("AppShow"));
  
//wd.Exec(Procedure("FileNew")<<"Normal");//创建一个普通的新文件
wd.Exec(Procedure("FileOpen")<<"C:\\WINDOWS\\pss\\zpdy.jpg");

wd.Exec(Procedure("Insert")<<Str);//插入Str
wd.Exec(Procedure("FilePrint"));// 打印，只要把FilePrint改为FilePrintPreview，就可以实现打印浏览了
int n=10;//打印份数
for(int i=0;i<n;i++){
wd.Exec(Procedure("FilePrintPreview"));
Sleep(30);
}
//wd.Exec(Procedure("FileClose")<<1);//关闭文件
wd.Exec(Procedure("FileQuit"));//退出WORD
}

catch (...)
{
 ShowMessage("什么?!打印不了，《贴身剪贴板》链接不了 Word .");
}