画线问题(50分)

  • 主题发起人 主题发起人 意林
  • 开始时间 开始时间

意林

Unregistered / Unconfirmed
GUEST, unregistred user!
在delphi中如何控制在word中的文字上画一条骑缝线(虚线),我用了
WordObject.Application.ActiveDocument.Shapes.AddLine(37.5, 486, 546.75, 486);
却连编译都未通过,请教高手,如何解决?
 
在delphi中如何控制在word中的文字上画一条线,我用了
WordObject.Application.ActiveDocument.Shapes.AddLine(37.5, 486, 546.75, 486);
却连编译都未通过,请教高手,如何解决?
提示:
No enough actual parameters
该如何加上所需的参数?
 
如何取得word中字符的位置?
 
没人理我吗?
 
你可以查一下MSDN: (别告诉我你没有哟)
Microsoft Office Development
Office97 Documentation
Office
Microsoft Office97/ Visual Basic Language Refrence
Volume 3
Microsoft Word Language Refrence

>>字符的位置
Range?
 
急!
我用delphi控制word打印一份指定格式的函件,其中要在一标题上打出虚线(字上穿过)
,标题的位置可能变动,请问在delphi中如何实现?比如我要在‘回复单‘上打印出一条
虚线,如何实现?标题的位置如何确定?
WordObject:=CreateOLEObject('Word.Application');
WordObject.Application.Selection.TypeText('回 复 单');
//固定位置划线,如何随字变动?
WordObject.Application.ActiveDocument.Shapes.AddLine(67.5, 426.5, 536.75, 426.5);
//下列代码设置划线属性(虚线),但报错‘未定义。。。',编译未通过,如何解决?
WordObject.Application.Selection.ShapeRange.Line.DashStyle := msoLineLongDash;

 
最后一次移前
我心已冷,没人能帮我吗?
是分太少,还是不屑回答?
DFW????
 
试试先用WORD做一个文件,其中只有一条虚线,再把两个文件加在一起.如果你知道怎样
组合在一起,我只知有这个功能.
我看别人的代码有一些 [] 号,但你的没有,是不是这个错了
我没用过WORD,只是些建议
 
后退
顶部