teng001
路人甲
路人甲
  • 注册日期2006-04-07
  • 发帖数4
  • QQ
  • 铜币117枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:1582回复:0

[求助]鼠标移动的时候获取精纬度.(在文本框里面)

楼主#
更多 发布于:2006-04-25 14:16
<P>  double MX,MY;<br>double x1,y1;</P>
<P>float xx,yy;<br>    long cunit;<br>    CString UnitStr;<br>    xx = X;<br>    yy = Y;<br><br>   // cunit = m_map.DisplayCoordSys.Units<br>    m_map.GetDisplayCoordSys();<br>    //cunit=m_map.GetNumericCoordSys();<br>  //   m_map.GetNumericCoordSys();<br>// cunit=m_map.GetCurrentTool();<br>   // Map1.NumericCoordSys.Set miLongLat, 0</P>
<P>   // m_map.ConvertCoord( xx,yy,MX,MY,1) ;<br>     m_map.ConvertCoord(;X,;Y,;MX,;MY,miScreenToMap);</P>
<P>   // Map1.ConvertCoord X, Y, MX, MY, 1<br>        x1 = MX;<br>     y1 = MY;</P>
<P>  switch(cunit)<br>  {<br>   case 0 : UnitStr = "英里";break;<br>            case 1 : UnitStr = "公里"; break;               //'miUnitKilometer = 1<br>            case 2 : UnitStr = "英寸";   //'miUnitInch = 2<br>            case 3 : UnitStr = "英尺" ;   //'miUnitFoot = <br>            case 4 : UnitStr = "码";      //'miUnitYard = 4<br>            case 5 : UnitStr = "毫米" ;//'miUnitMillimeter = 5  <br>            case 6 : UnitStr = "厘米" ;//'miUnitCentimeter = 6<br>            <br>    case 7 : UnitStr = "米";   // 'miUnitMeter = 7<br>         <br>    case 8 : UnitStr = "US Survey Feet" ; //'miUnitSurveyFoot = 8<br>        <br>    case 9 : UnitStr = "海里" ;//'miUnitNauticalMile = 9<br>            <br>    case 10 : UnitStr = "缇" ;//'miUnitTwip = 10<br>            <br>    case 11 : UnitStr = "点" ;//'miUnitPoint = 11<br>            <br>    case 12 : UnitStr = "Pica" ;//'miUnitPica = 12<br>            <br>    case 13 : UnitStr = "度" ;//'miUnitDegree = 13<br>           <br>    case 30 : UnitStr = "令";// 'miUnitLink = 30<br>            <br>    case 31 :UnitStr = "链";// 'miUnitChain = 31<br>            <br>    case 32 : UnitStr = "竿";   // 'miUnitRod = 32<br>            <br>  }</P>
[此贴子已经被作者于2006-4-25 14:20:02编辑过]
喜欢0 评分0
游客

返回顶部