我在delphi中用createoleobject生成一个word文档,但是对其中的一些属性赋值老出错,其中有一个例子:try
MSWord:=GetActiveOleObject('Word.Application');
except
try MSWord:= CreateOleObject('Word.Application');
except
MessageBox(null,'Word未安装或加载OLE出错!','出错信息',MB_OK);
exit;
end; end;
MSWord.Visible:=true;
MSWord.Documents.Add;
MSWord.Caption:='新文档';
MSWord.Selection.TypeParagraph;
MSWord.Selection.TypeText(Text:='文章标题');
MSWord.Selection.ParagraphFormat.Alignment:=wdAlignParagraphCenter;
MSWord.Selection.Font.Size := 16;本意就是在word中插入文章标题,然后设置其居中,改变字体。这在word的VBA中运行良好,但是在delphi中运行到MSWord.Selection.ParagraphFormat.Alignment:=wdAlignParagraphCenter就出错,说是参数不对,我给word当中的一些属性赋值时老出错,请问应该怎么解决?谢谢各位了。还有在word中怎么用宏插入图表(如柱状图、饼状图等)?不胜感激。
MSWord:=GetActiveOleObject('Word.Application');
except
try MSWord:= CreateOleObject('Word.Application');
except
MessageBox(null,'Word未安装或加载OLE出错!','出错信息',MB_OK);
exit;
end; end;
MSWord.Visible:=true;
MSWord.Documents.Add;
MSWord.Caption:='新文档';
MSWord.Selection.TypeParagraph;
MSWord.Selection.TypeText(Text:='文章标题');
MSWord.Selection.ParagraphFormat.Alignment:=wdAlignParagraphCenter;
MSWord.Selection.Font.Size := 16;本意就是在word中插入文章标题,然后设置其居中,改变字体。这在word的VBA中运行良好,但是在delphi中运行到MSWord.Selection.ParagraphFormat.Alignment:=wdAlignParagraphCenter就出错,说是参数不对,我给word当中的一些属性赋值时老出错,请问应该怎么解决?谢谢各位了。还有在word中怎么用宏插入图表(如柱状图、饼状图等)?不胜感激。
解决方案 »
- 急在线等,重叠I/O模型,发送数据包中存在#0,#0以后的内容服务器端无法收到.
- 帮调源程序(100分)大家都来看看
- 用delphi做过web services的请看看。
- 我的DBLookupComboBox为什么第一次不能将内容保存进数据库,第二次确行?
- dbedit问题
- 如何关闭正在使用的abc.mdb文件?
- 麻烦问一下,李维的三本书中用的控件是什么版本的delphi5,为什么我的professional的典型安装没有,要最大安装吗?
- 在Delphi中,读取数据时一个奇怪的问题!
- 如何让窗体取代windows底部桌面。高手请进来解答..
- 如何使用TDataSet::DataSetField?
- 在线急等!下面这段代码有错误吗?
- 如何删除VCL已经安装的控件,不是隐藏,而是删除,我的难题,希望帮忙,谢谢马上给分
所以应该将
MSWord.Selection.TypeText(Text:='文章标题');
改为:
MSWord.Selection.TypeText('文章标题');
运行起来是没有问题的,是MSWord.Selection.ParagraphFormat.Alignment:=wdAlignParagraphCenter不对,原因就是wdAlignParagraphCenter这个值delphi不能识别,将它设成字符串在vba中就是参数类型错误。不知怎么解决