procedure TMainForm.ActioonMakeMapByConditionExecute(Sender:TObject);begin casepr I_M_TVselect of 4: begin //巡视人员 I_M_CondtSlt :=5; MakeMapwithCode_Mitab(S_M_TV_Data, S_M_Areacode,I_M_Unitlevel,’UniocomMap’, S_M_Mapath,MapDetail, I_M_CondtSit); //Mitab 调用方法 // S_M_Areacode , I_M_Unitlevel 应用登录用户随带的数据分别代表访问用户所 属地区和单位级别 end; end; I_M_AtionCurr:=TAction(Sender).Tag ; ActionMainFormShow,Execute; end;
免责声明：本站发布的内容（图片、视频和文字）以原创、转载和分享为主，文章观点不代表本网站立场，如果涉及侵权请联系站长邮箱：is@yisu.com进行举报，并提供相关证据，一经查实，将立刻删除涉嫌侵权内容。
