急!急!急!(100分)

  • 主题发起人 主题发起人 mas_chen
  • 开始时间 开始时间
M

mas_chen

Unregistered / Unconfirmed
GUEST, unregistred user!
我使用录制宏:代码如下
Sub Macro5()
'
' Macro5 Macro
' 宏在 2006-5-27 由 aaa 录制
'
With Selection.Paragraphs(1).DropCap
.Position = wdDropNormal
.FontName = "MT Extra"
.LinesToDrop = 2
.DistanceFromText = CentimetersToPoints(1)
End With
End Sub
其中将Selection.Paragraphs(1).DropCap
转为Delphi语句怎么通过不了呀?
我使用 word:=createoleobject('word.application)
然后word.selection.paragraphs(1).dropcap语句不能使用 请高手赐教!!!感谢之至!!!
另外:centimeterstopoints()函数前少个句柄,我该如何使用?
 
我会了 呵呵!
 
word.selection.paragraphs.item[1].dropcap
 
上面的我会了,请问这一句怎么转换成delphi代码?
ActiveDocument.Shapes("Picture 2").Select(选中了word中的一张图片的操作)
还有类似的转换,有没有资料可以查?
 
后退
顶部