阅读:2037回复:4
delphi开发mo问题:如何从线获得点
<P>var
objRecs:IMoRecordSet; firstPart :IMoPoints; lineClicked :IMoLine ; ptStart:IMoPoint ; objFields:IMOFields; objField:IMOField;</P> <P>begin //搜索</P> <P>objRecs:=g_layer.SearchByDistance(moEndPoint,12,''); if( not objRecs.EOF) then begin objFields:=objRecs.fields; lineClicked:=IMoLine(CreateOleObject('MapObjects2.Line'));</P> <P> //获得线,线已经选上了 lineClicked:=IMoLine(IDispatch(objFields.Item('shape').value));</P> <P>//在这里出错了,错误提示:Missing operator or semiconlon firstPart:=lineClicked.Parts(0);</P> |
|
1楼#
发布于:2005-03-02 15:32
<P>pts := IMoPoints(line.Parts.item(0));</P><P>我就是这样用的,如果你还不行可以留下email地址,我发个例子给你。</P>
|
|
2楼#
发布于:2005-03-02 08:44
这样还是不行
line.parts.item(0)应该得到的是点,可是我试了也不行,你再试试,delphi+Mo的帮助太少了,你都看一些什么资料? |
|
3楼#
发布于:2005-03-02 08:13
谢谢这位朋友,我回去试试
多谢了 |
|
4楼#
发布于:2005-03-01 10:29
我也是同样的问题,在例子里看到VB中是通过line.parts(0)来得到points的,在Delphi中我们可以用line.Parts.item(0)来得到IMoPoints,你可以试试,我是刚试的;另外我是Delphi+Mo的,只是不是很久,错了不要怪我。
|
|