Delphi 向Word文件中插入字符,在不打开Word格式文件的情况下,将字符串内容插入到Word中。请根据窗口中的几个选项添加内容:向Word中添加的字符、插入指定的字符、字符串长度、插入的位数等,相关代码如下:
begin
VApp:=CreateOleObject('Word.Document');//添加 comobj单元
X:=VApp.Range(0,0);
X.InsertBefore('Hello from Delphi');//添加字符
X.Font.Name:='Arial';
X.Font.Size:=18;
X.InsertParagraphAfter; //插入段落
X:=VApp.Range(17,17);
X.InsertBefore('!');//插入字符
X.Font.Name:='Arial';
X.Font.Size:=18;
X.InsertParagraphAfter;
VApp.SaveAs(Extractfilepath(Application.ExeName) 'Hold11.doc');//保存修改后的Word文档
end;(完整源码请下载源码包。)
1