为什么我用 delphi 设置 word 样式(style)时老出错??? 请高手指点一下!!(100分)

  • 主题发起人 主题发起人 caplin
  • 开始时间 开始时间
C

caplin

Unregistered / Unconfirmed
GUEST, unregistred user!
var wordApp,wordDoc:variant;
begin
wordApp:=createOleObject('Word.Application');
wordApp.visible:=true;
wordDoc:=wordApp.Documents.add;
wordApp.selection.style:=wordDoc.style.item('标题 1');//这句老出错,提示:"Style不是一种引用属性".
end;

如果我自接用server 组件是可以通过set_style()函数解决.
var olevar1,olevar2,olevar3:olevariant;
begin
WordApplication1.connect;
WordApplication1.visible:=true;
olevar1:='normal.dot';
olevar2:=false;
WordApplication1.documents.add(olevar1,olevar2);
olevar3:='标题 1';
WordApplication1.set_style(olevar3);
end;
 
好像是COM引用中不支持 字串
你改成 wordApp.selection.style:= -2;
就可以了
具体再查查
 
蛋炒饭:
谢谢!我先试试看!
 
蛋炒饭:
我根据你的办法,试了一下,可以行的通,但是我如何取得特定样式的索引号呢?我的模板中有大量的"自定义样式"。
还望高手相助。
 
接受答案了.
 
后退
顶部