RAD Studio XE2下如何读取word文件?
不知怎么,在RAD Studio XE2下没有看到读取word的控件,请问怎么回事?
那有没有什么办法在XE2下读取WORD文件呢?多谢!
[解决办法]
是不是没有安装组件,在菜单Component->install packages-->列表里面有没有***office 2000 servers或是office xp的选上
用组件或者直接用ole
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Variant MSWord,vSelect ;
try
{
MSWord=Variant::CreateObject("Word.Application");
}
catch(...)
{
MessageBox(0, "启动 Word 出错, 可能是没有安装Word.",
"提示", MB_OK
[解决办法]
MB_ICONERROR);
MSWord = Unassigned;
return;
}
// 隐藏Word界面
MSWord.OlePropertySet("Visible", true);
MSWord.OlePropertyGet("Documents").OleProcedure("Open", "C:\\Doc3.doc");
vSelect = MSWord.OlePropertyGet("Selection");
vSelect.OleProcedure("GoTo",-1,0,0,"asd1");
vSelect.OleProcedure("TypeText","123测试");
MSWord.OlePropertyGet("ActiveDocument").OleProcedure("Save");
MSWord.OleFunction("Quit");
MSWord=Unassigned;
}
//---------------------------------------