IHaveTOTryMybest
IHaveTOTryMybest
2015-04-10 16:23
采纳率: 100%
浏览 1.9k

C++builder中怎么样将Memo中的文本写入到word中

C++builder中怎么样将Memo中的文本写入到word中

  • 点赞
  • 写回答
  • 关注问题
  • 收藏
  • 邀请回答

2条回答 默认 最新

  • kfrght
    宝龙哥 2015-04-11 04:08
    已采纳

    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    Variant vWordApp;
    try
    {
    vWordApp = Variant::CreateObject("Word.Application");
    }
    catch(...)
    {
    MessageBox(0, L"启动 Word 出错, 可能是没有安装Word.", L"提示", MB_OK | MB_ICONERROR);
    return;
    }

    // 显示Word界面
    vWordApp.OlePropertySet("Visible", true);
    // 新建一个文档
    vWordApp.OlePropertyGet("Documents").OleFunction("Add");
    //
    Variant vSelect = vWordApp.OlePropertyGet("Selection");

    // 插入一段文字
    String str1 = Memo1->Text;
    vSelect.OleProcedure("TypeText", WideString(str1));
    vSelect.OleProcedure("TypeParagraph");

    // 将光标移到文档结尾
    vWordApp.OlePropertyGet("Selection").OleProcedure("EndKey", 6); //wdStory

    }

    点赞 评论
  • caozhy

    google TWordApplication 写word

    点赞 评论

相关推荐