哦,我想知道delphi到底能不能将word数据导入,做了修改之后再存储到硬盘上因为在做毕业设计,所以,急需
谢谢各位了,帮个忙吧
谢谢各位了,帮个忙吧
解决方案 »
- 请教:服务器端的 ClientSocket1 的向 客户端 ServerSocket1 发送可以,反过来不行?
- FastReport打印空Image字段时出错的问题!
- dbgrid的简单问题!!!!!!
- 求助~1,关于报表
- 在局域网中,我如何使用udp发送信息给其它主机?
- 今天悲喜交加,散点分,顺便问一下,怎样才能很好的学好delphi?
- 存储过程中数据的完整性
- 如何正确使用messagebox函数?
- 如何实现向其它程序发送按钮
- 难道这是D6的bug,D5就没有问题啊!关于dll得DllProc的问题!
- tadoquery 帮看一下
- belllab,你有DevExpress系列 For D7版的下载地址吗?
那么下面的程序帮你忙:
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;