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;
成都创新互联是一家从事企业网站建设、
成都网站设计、成都做网站、行业门户网站建设、网页设计制作的专业网站建设公司，拥有经验丰富的网站建设工程师和网页设计人员，具备各种规模与类型网站建设的实力，在网站建设领域树立了自己独特的设计风格。自公司成立以来曾独立设计制作的站点上千多家。
另外有需要云服务器可以了解下创新互联scvps.cn，海内外云服务器15元起步，三天无理由+7*72小时售后在线，公司持有idc许可证，提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案，具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势，专为企业上云打造定制，能够满足用户丰富、多元化的应用场景需求。
标题名称：简单的线路的界面的调用方法-创新互联
URL网址：
http://cdkjz.cn/article/iecog.html
