getpoint方法出现的一个小问题
本帖最后由 作者 于 2007-4-25 15:59:21 编辑 <br /><br /> <p>我在用delphi做cad的二次开发,遇到这样一个问题,就是使用getpoint方法时,提示expression expected but ',' found.代码如下:</p><p>procedure TForm1.Button1Click(Sender: TObject);<br/>var<br/>startpnt:variant;<br/>begin<br/> startpnt:=acad.ActiveDocument.Utility.GetPoint(,'请输入绘图起始点:');<br/> end;</p><p>end.</p><p>这个问题很奇怪,因为把acad定义为acadapplication的时候会出现上述错误,但是把acad定义为olevariant时却不会出现上述错误。</p> 希望有人能帮我解答!不胜感激! <p>acad.ActiveDocument.Utility.GetPoint(<font color="#ff0000">nil</font>,'请输入绘图起始点:');</p><p>不知道是不是这样?或者用null?反正delphi不能象vb那样省略参数而光写逗号.<br/></p>
页:
[1]