5.专题图制作和地图打印.ppt

  1. 1、本文档共74页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
5.专题图制作和地图打印剖析

跳绘线型 Fh\跳绘.style 练习 制作文加圈符号 体会符号库中符号名字和字段值关系,实现符号匹配,数据:g47g067070.gdb\DLTB 二分式标注和标注转注记 高级分式式,代码调用和扩展 等高线标注和线型设置 批量打印 自己打印标准分幅 3、切割打印 设置切割打印的内容 设置网格 4.矢量转图片 在Arcmap文件,加载地图,使用(文件File)中输出地图,格式有PNG,emf,eps,pdf,jpg,bmp,svg,gif,tif等,自己设置大小和格式,写坐标文件(write world file)是自动配准,可以调整分辨率,pdf,svg,emf默认是300,其他为96,数字越高,输出的文件越大,清晰度越高,图片大小地图窗口的尺寸*分辨率,该工具只是针对当前地图窗口的内容 另一种土方法:抓屏,printscrn,抓屏幕 alt+ printscrn抓当前窗口 界面上有汉字输出pdf,出现乱码问题 界面上有汉字输出pdf,出现乱码问题, 下面两个都选中 4输出指定比例尺图片 在Arcmap中查看全图,进入布局窗口,在数据框中设置固定比例,如1:10000后确定,调整布局的大小,最后使用导出地图当前窗口在布局 六、案例打印 4.专题图制作和地图打印输出\案例\G48G016023.mxd 1、标准分幅打印 批量打印,页面驱动 新疆边界 数据:\4.专题图制作和地图打印输出\新疆多圈.mxd 六、自己工具打印地图 本章回顾 各种专题图制作方法 布局、Frame(框架),打印机三者的关系 比例尺打印的设置 * 1、切片的例子 数据:4地图打印\切片数据\sl.mxd 1、简单标注字段—有些标注部分 只部分标注,或则不同标注不一样,见同一个图层不同标注.exe 简单二分式 und [DLMC] /und vbcrlf [地类代码] 或则 und [DLMC] /und vbnewline [地类代码] 或则und [DLMC] /und chr(13) chr(10) [地类代码] 4.专题图制作和地图打印输出\标注\各种标注.mxd 换行三种表示方法 Vbcrlf Vbnewline chr(13) chr(10) Vb不区分大小写 二分式美观 格式:4.专题图制作和地图打印输出\分式标注.mxd 二分式代码美观 设计人:闫磊 ----------FUNCTION MYFINDLABEL ---------- FUNCTION myFindLabel ( DZM, NAME ) a=strlen(dzm) b=strlen(NAME) IF ab then myFindLabel =und DZM/und vbcrlf NAME ELSE str= space((b-a)/2) myFindLabel =und str DZMstr/und vbcrlf NAME END if END Function 代码续 ----------FUNCTION STRLEN(STR)---------- FUNCTION strlen(str) dim p_len p_len=0 strlen=0 p_len=len(str) FOR xx=1 to p_len IF asc(mid(str,xx,1))0 then strlen=int(strlen) + 2 ELSE strlen=int(strlen) + 1 END if NEXT END function 编制:2012-03-25 Function FindLabel ( [地类代码] , [DLMC] ) FindLabel = myFindLabel( [地类代码] , [DLMC]) End Function 三分式原始的 [DLMC] vbcrlf -------- [TBMJ] 公顷 vbcrlf [地类代码] 标注显示1位小数 方法二(高级) 简单代码: [DLMC] vbcrlf -------- round([TBMJ],1) 公顷 vbcrlf [地类代码] 问题整数不显示小数位 显示小数位 replace(formatNumber( [TBMJ] ,1),,,) 标注显示一位小数 (高级) Function FindLabel ( [Shape_Area] ) if abs(round([Shape_A

文档评论(0)

jiayou10 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

版权声明书
用户编号:8133070117000003

1亿VIP精品文档

相关文档