线路选择巡线人员

科技小能手 2017-11-07

string

procedure  TMainForm. ActionMakeHistroyTrackExecute(Sender:  Tobject);

     var

         sdtbegin,sdtend: string;

     begin

         I_M_ActionCurr:= TAction(Sender).Tag;

         sdtbegin:= formatdatetime('yyyy-mm-dd',DTPKerBegin.Date);

         adtend:=formatdatetime('yyyy-mm-dd', DTPKerEnd, Date);

       MakeMapwithHistroywithouert_Mitab(S_M_Tv_Data,sdtbegin,sdtend,'UnicomMap',S_M_MapPath,MapDetail,10);

         //S_M_Tv_Data  线路-巡线人员节点上的选择数据即人员的定位终端号

         //UnicomMap  为生成的动态图层的名称

         //S_M_MapPath   为地图所在的路径

         //MapDetail  为地图显示控件的名称

         //10就是对应于PIKD参数的值,表示是过去的轨迹请求

     end



本文转自huangyouliang10 51CTO博客,原文链接:http://blog.51cto.com/1572091hyl10/1763621
登录 后评论
下一篇
云栖号资讯小编
1515人浏览
2020-04-07
相关推荐
服务器托管
4773人浏览
2017-12-10 23:53:00
0
0
0
507