阅读:1442回复:0
【求助】有关mapx画线的问题
<P>小弟画图程序如下</P>
<P>Private Sub DRAW(xx1 As Single, yy1 As Single, xx2 As Single, yy2 As Single)<BR> Dim FeaFac As MapXLib.FeatureFactory<BR> Dim Fea As New MapXLib.Feature<BR> Dim Pts As New MapXLib.Points, pt As New MapXLib.Point<BR> 'Dim i As Integer<BR> Fea.Attach Map1<BR> Fea.Type = miFeatureTypeLine<BR> Fea.Style = Map1.DefaultStyle<BR> pt.Set xx1, yy1<BR> Pts.add pt<BR> pt.Set xx2, yy2<BR> Pts.add pt<BR> <BR> Set Fea = Map1.FeatureFactory.CreateLine(Pts, Fea.Style)<BR> Map1.Layers(1).AddFeature Fea 'Map1.Layers.Count<BR> Map1.Refresh<BR> Pts.RemoveAll<BR>End Sub</P> <P> 为什么当x1y1 = 1,3 x2,y2 = 1000,1000 的时候,在地图里画出的直线坐标却是</P> <P>Bound x1=0.001001 km y1 =0.002999km </P> <P>Bound x2 = 0.012156km y2 = 0.012159 km 呢?</P> <P>其中有什么规律呢?我觉得我画的直线很乱 </P> |
|