加载中…
个人资料
架构设计师
架构设计师
  • 博客等级:
  • 博客积分:0
  • 博客访问:774
  • 关注人气:10
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
博文
标签:

delphi

olecontainer

word

office

it

分类: Delphi
1、打开Word,并新建一个文档
  oleContainer1.CreateObject('Word.Document',false);
  oleContainer1.DoVerb(ovShow);

2、打开excel,并新建一个表单
  oleContainer1.CreateObject('Excel.sheet',false);
  oleContainer1.DoVerb(ovShow);

3、打开已存在的文件
  oleContainer1.CreateObjectFromFile('E:\办公\2012\a.doc',False);
  oleContainer1.DoVerb(ovShow);

4、显示、隐藏菜单和工具栏
  oleContainer1.OleObject.CommandBars['Menu Bar'].Visible:=True; //显示菜单,注意Form需要有MainMenu
  oleContainer1.OleObject.CommandBars['Standard'].Visible:=False; //隐藏工具栏,具体代表哪一个工具栏,可以在WORD中录制一下宏,那就一清二楚了[:)]
  oleContainer1.OleObject.CommandBars['Formatting'].Visible := False;
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有