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
亿速云「云服务器」，即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘，价格低至29元/月。点击查看>>
免责声明：本站发布的内容（图片、视频和文字）以原创、转载和分享为主，文章观点不代表本网站立场，如果涉及侵权请联系站长邮箱：is@yisu.com进行举报，并提供相关证据，一经查实，将立刻删除涉嫌侵权内容。
计算
安全
数据库
网络和加速
企业服务
