好库网 好库网首页 | 我的好库
Delphi盒子

在Word插入字符-Delphi资料

发布者:delphibox
发布日期:2011/4/8 22:33:50   更新日期:2011/4/8 22:33:50
阅读次数:2239
评分:4.80
介绍: 在Word插入字符-Delphi资料
正文:

现在的文档很多都是用Word软件来编辑的,但如果你想在程序中把某些字符插入到Word文档中,那么下面的程序帮你忙:

procedure TForm1.Button1Click(Sender: Tobject);

var MSWord: Variant;

begin

MSWord := CreateOLEObject('Word.Application');//连接Word

MSWord.Documents.Open(FileName:='d:\test.doc'

ReadOnly:=True);//打开外部Word文档

MSWord.Visible := 1;//是否显示文件编辑

MSWord.ActiveDocument.Range(Start:=0

End:=0);//开始改变的启止位置

MSWord.ActiveDocument.Range.InsertAfter(Text:='Title');//在Word中增加字符'Title'

MSWord.ActiveDocument.Range.InsertParagraphAfter;

MSWord.ActiveDocument.Range.Font.Name := 'Arial';//字体名称

MSWord.ActiveDocument.Range.Font.Size := 24;//字体大小

end;


评论 [发表评论]
账号 密码 还没帐号呢,现在注册一个?

免责声明:好库网所展示的信息由买卖双方自行提供,其真实性、准确性和合法性由信息发布人负责。好库网不提供任何保证,并不承担任何法律责任。