阅读:1322回复:0
关于画点的工具的问题,请大家帮忙看看,多谢了。
<P>画上的点看不见,重新启动或刷新地图就看到了,</P>
<P>为什么呢,代码:</P> <P>Toolused: </P> <P>if ToolNum=CUSTOM_POINT_TOOL then begin pt:=CreateOLEObject('MapX.Point.4'); pt.set(X1,Y1); newobject:=map1.ControlInterface.FeatureFactory.CreateSymbol(pt,map1.DefaultStyle) ; EditLayer.AddFeature(newObject);</P> <P> map1.CurrentTool:=miArrowTool; end;</P> <P>procedure TMainForm.NAppendNewDeviceClick(Sender: TObject); begin Map1.ControlInterface.Layers.Item('PDWsymbol').Editable:=true; Editlayer:=Map1.ControlInterface.Layers.Item('PDWsymbol'); Map1.CurrentTool:= CUSTOM_POINT_TOOL ; end;</P><img src="images/post/smile/dvbbs/em08.gif" /> |
|