A
ArmyGuo
Unregistered / Unconfirmed
GUEST, unregistred user!
1、在使用“VBA”的时候,使用任何一个对象的属性或方法前必须先创建该对象!
例如:
var WordYeMeiRange:OleVariant;
begin
正确:
//创建页眉/页脚选中对象
WordYeMeiRange:=WordApp.ActiveDocument.Sections.Item(1).Headers.Item(1).Range;
WordYeMeiRange
错误(编译器会报“ParagraphFormat method not support by then automation object”的错):
WordApp.ActiveDocument.Sections.Item(1).Headers.Item(1).Range.ParagraphFormat.Alignment:=0;
end;
2、(这点我不太确定,需大家论证)好像Delphi不支持类似于“wdAlignParagraphCenter”之类的VBA常量
,需用整数代替。
对齐方式的整数意义:0:左 1:中 2:右 3: 内侧 4:外侧
其它暂时想不起来了,想起来再续!
例如:
var WordYeMeiRange:OleVariant;
begin
正确:
//创建页眉/页脚选中对象
WordYeMeiRange:=WordApp.ActiveDocument.Sections.Item(1).Headers.Item(1).Range;
WordYeMeiRange
错误(编译器会报“ParagraphFormat method not support by then automation object”的错):
WordApp.ActiveDocument.Sections.Item(1).Headers.Item(1).Range.ParagraphFormat.Alignment:=0;
end;
2、(这点我不太确定,需大家论证)好像Delphi不支持类似于“wdAlignParagraphCenter”之类的VBA常量
,需用整数代替。
对齐方式的整数意义:0:左 1:中 2:右 3: 内侧 4:外侧
其它暂时想不起来了,想起来再续!