“自动绘制横断面图”软件更新(XP样式菜单)
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: left; mso-line-height-alt: 0pt; mso-pagination: widow-orphan" align=left><FONT face="Times New Roman"> </FONT>为回报论坛，我用<FONT face="Times New Roman">VB</FONT>引用<FONT face="Times New Roman">AutoCAD</FONT>及<FONT face="Times New Roman">Excel</FONT>自编了<FONT face="Times New Roman">“</FONT>自动绘制横断面图<FONT face="Times New Roman">”</FONT>程序，请论坛各位同行试用，并请各位多提出宝贵意见。<BR> 软件功能及使用对象：为公路或水利部门技术人员特别是公路基层施工单位的测量人员或测量监理工程师自动画横断面图及计算断面土方用<FONT face="Times New Roman">(</FONT>本软件就此功能<FONT face="Times New Roman">)</FONT>。<BR> 软件要求<FONT face="Times New Roman">:AutoCAD2004</FONT>及以上中文版<FONT face="Times New Roman"> + Excel2000</FONT>及以上中文版 <BR> 本次更新：①美化了软件界面，增加了多种<FONT face="Times New Roman">OfficeXP</FONT>风格的菜单，并可自己更换菜单风格<FONT face="Times New Roman">! </FONT>②增加了对用户播放音乐时无意关闭Excel数据文件的检测。③修改了局部界面及代码。<BR> 无法下载本软件用户如需要我直接将此软件发送到你的邮箱中！<BR> <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: left; mso-line-height-alt: 0pt; mso-pagination: widow-orphan" align=left><FONT face="Times New Roman"> </FONT> <U><FONT face="Times New Roman">2006.12.31</FONT></U><U>日前软件注册价为</U><U><FONT face="Times New Roman">150</FONT></U><U>元 </U><BR> <FONT face="Times New Roman"> <o:p></o:p></FONT></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: left; mso-line-height-alt: 0pt; mso-pagination: widow-orphan" align=left><FONT face="Times New Roman"> </FONT> 作<FONT face="Times New Roman"> </FONT>者：黄玉宏 二○○六年十一月八日 联系：<FONT face="Times New Roman">htgsgcc@163.com<o:p></o:p></FONT></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-ALIGN: left; mso-line-height-alt: 0pt; mso-pagination: widow-orphan" align=left>☆☆特别说明：请先将HookMenuCtl.ocx复制到WinXP系统C:\Windows\System32\下!<o:p></o:p></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-INDENT: 20pt; TEXT-ALIGN: left; mso-char-indent-count: 2.0; mso-pagination: widow-orphan" align=left><o:p> </o:p></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-INDENT: 20pt; TEXT-ALIGN: left; mso-char-indent-count: 2.0; mso-pagination: widow-orphan" align=left>以下是软件的<FONT face="Times New Roman">“</FONT>帮助文件<FONT face="Times New Roman">”</FONT>：<BR>三、使用方法<BR><FONT face="Times New Roman">1</FONT>、本软件适用于公路或水利各种横断面图绘制<FONT face="Times New Roman">,</FONT>提供<FONT face="Times New Roman">1:100</FONT>和<FONT face="Times New Roman">1:200</FONT>两种比例。主要功能有<FONT face="Times New Roman">3</FONT>种：①绘制基本横断面图；②绘制路面顶层及原地面压实后断面图<FONT face="Times New Roman">(</FONT>戴帽子求土方<FONT face="Times New Roman">)</FONT>；③绘制任意断面的填方或挖方横断面。<BR><FONT face="Times New Roman">2</FONT>、打开已输入数据的<FONT face="Times New Roman">“</FONT>横断面数据模板<FONT face="Times New Roman">”</FONT>文件<FONT face="Times New Roman">,</FONT>关闭其它所有<FONT face="Times New Roman">Excel</FONT>文件后方可打开本软件。软件启动时要输入绘图比例参数<FONT face="Times New Roman">,1:100</FONT>比例绘图参数为<FONT face="Times New Roman">1,1:200</FONT>比例参数为<FONT face="Times New Roman">2</FONT>；只有输入<FONT face="Times New Roman">1</FONT>或<FONT face="Times New Roman">2</FONT>时<FONT face="Times New Roman">“</FONT>绘图参数输入<FONT face="Times New Roman">”</FONT>界面才会自动消失<FONT face="Times New Roman">(</FONT>因输入该参数后软件立即读入数据<FONT face="Times New Roman">,</FONT>故数据较多时本过程可能要几秒钟<FONT face="Times New Roman">),</FONT>输入其它数字软件自动关闭。<FONT face="Times New Roman">“</FONT>绘图分类<FONT face="Times New Roman">”</FONT>菜单选择<FONT face="Times New Roman">3</FONT>种绘图类别中的一种<FONT face="Times New Roman">,</FONT>点<FONT face="Times New Roman">“</FONT>绘图<FONT face="Times New Roman">”</FONT>按钮即可自动进入<FONT face="Times New Roman">CAD</FONT>界面。如使用<FONT face="Times New Roman">CAD</FONT>模板则要在启动本软件之前打开它<FONT face="Times New Roman">(</FONT>即：<FONT face="Times New Roman">“</FONT>横断面数据模板<FONT face="Times New Roman">”--“CAD</FONT>模板<FONT face="Times New Roman">”--“</FONT>本软件<FONT face="Times New Roman">”)</FONT>。<BR><FONT face="Times New Roman">3</FONT>、<FONT face="Times New Roman">CAD</FONT>中处理：断面图可在<FONT face="Times New Roman">CAD</FONT>任意位置捕捉或输入捕捉点坐标。图形移动前基点坐标为<FONT face="Times New Roman">(0,0),</FONT>捕捉点<FONT face="Times New Roman">Y</FONT>坐标应为<FONT face="Times New Roman">50</FONT>的整数倍<FONT face="Times New Roman">,X</FONT>坐标宜为图纸中心线或图纸左边线。每次点<FONT face="Times New Roman">“</FONT>绘图<FONT face="Times New Roman">”</FONT>按钮软件都自动最小化并进入<FONT face="Times New Roman">CAD</FONT>界面<FONT face="Times New Roman">(</FONT>绘制首横断面该过程会耗时几秒钟<FONT face="Times New Roman">),CAD</FONT>软件可一直最大化<FONT face="Times New Roman">,</FONT>通过任务栏本软件最小化米格纸图标和<FONT face="Times New Roman">CAD</FONT>相互切换。<BR><FONT face="Times New Roman">4</FONT>、本软件的智能：对路基填方或挖方能自动修剪坡脚线和自动延伸不够长的原地面线；能自动计算填挖面积；能将断面积汇总到<FONT face="Times New Roman">“</FONT>面积汇总<FONT face="Times New Roman">”</FONT>工作表；汇总时能自动清除重复桩号值；能对断面桩号自动排序<FONT face="Times New Roman">(</FONT>此功能须<FONT face="Times New Roman">Excel2002</FONT>及以上版本<FONT face="Times New Roman">)</FONT>；能自动将用户输入的文本型或数字桩号转换成标准桩号。<BR><FONT face="Times New Roman">5</FONT>、界面<FONT face="Times New Roman">•</FONT>流程<FONT face="Times New Roman">•</FONT>编程：①为界面简洁<FONT face="Times New Roman">,</FONT>软件使用了隐藏式提示文字<FONT face="Times New Roman">,</FONT>软件打开<FONT face="Times New Roman">2</FONT>分钟提示文字消失；每次按<FONT face="Times New Roman">“</FONT>绘图<FONT face="Times New Roman">”</FONT>按钮时按钮文字显示当前绘图类别且按钮变为紫色<FONT face="Times New Roman">,</FONT>释放鼠标按钮恢复原状；主界面空白处、图片、“杜枚”、<FONT face="Times New Roman">“</FONT>帮助教程<FONT face="Times New Roman">”</FONT>界面右击将弹出快捷菜单<FONT face="Times New Roman">(</FONT>末者为智能菜单<FONT face="Times New Roman">)</FONT>。②<FONT face="Times New Roman">“</FONT>横断面数据模板<FONT face="Times New Roman">”</FONT>文件提供基础数据<FONT face="Times New Roman">,</FONT>软件读入数据并处理同时向<FONT face="Times New Roman">CAD</FONT>发送绘图命令和将部分数据<FONT face="Times New Roman">(</FONT>如面积<FONT face="Times New Roman">)</FONT>发送到<FONT face="Times New Roman">“</FONT>横断面数据模板<FONT face="Times New Roman">”</FONT>文件中。③源代码使用了大量数组且经过了长时间优化<FONT face="Times New Roman">,</FONT>软件启动相当快<FONT face="Times New Roman">,</FONT>特别是大量数据时效果明显<FONT face="Times New Roman">!(P4 2.4G + 256M</FONT>计算机<FONT face="Times New Roman">60000</FONT>个数据启动时间约<FONT face="Times New Roman">5</FONT>秒<FONT face="Times New Roman">!)<BR>6</FONT>、☆使用注意：要改变绘图比例须关闭本软件并重新打开。<FONT face="Times New Roman">“</FONT>横断面数据模板<FONT face="Times New Roman">”</FONT>文件可改名但其各工作表则千万不能改名<FONT face="Times New Roman">,</FONT>输入数据时其各工作表有粉红色图案特征单元格前不能删除及插入行或列；并且在整个绘图过程中该文件不能关闭<FONT face="Times New Roman">(</FONT>本次更新增加了对关闭<FONT face="Times New Roman">Excel</FONT>数据文件的检测<FONT face="Times New Roman">),</FONT>也不能向其内写入数据<FONT face="Times New Roman">,</FONT>如要新增或修改数据亦须关闭本软件并重新打开。<BR>四、音乐播放<BR>软件能播放：<FONT face="Times New Roman">*.mid</FONT>、<FONT face="Times New Roman">*.mp3</FONT>、<FONT face="Times New Roman">*.wma</FONT>、<FONT face="Times New Roman">*.wav</FONT>文件及部分视频文件<FONT face="Times New Roman">(*.wmv</FONT>、<FONT face="Times New Roman">*.mpg)</FONT>。方法：右击<FONT face="Times New Roman">“</FONT>杜枚<FONT face="Times New Roman">”</FONT>快捷菜单中选<FONT face="Times New Roman">“</FONT>选择音乐<FONT face="Times New Roman">”(</FONT>可连续或不连续选择音乐文件<FONT face="Times New Roman">),</FONT>加载音乐文件后软件能立即自动连续播放所选音乐；<FONT face="Times New Roman">“</FONT>显示列表<FONT face="Times New Roman">”</FONT>指所选音乐文件列表<FONT face="Times New Roman">,</FONT>其窗口能动态显示当前播放音乐名。单击<FONT face="Times New Roman">“</FONT>显示列表<FONT face="Times New Roman">”</FONT>下拉框能即时更改并从最新所选音乐开始向下至<FONT face="Times New Roman">“</FONT>显示列表<FONT face="Times New Roman">”</FONT>末连续播放。注意：只能<FONT face="Times New Roman">(</FONT>单选或连续<FONT face="Times New Roman">)</FONT>播放当前<FONT face="Times New Roman">(</FONT>最新<FONT face="Times New Roman">)“</FONT>选择音乐<FONT face="Times New Roman">”</FONT>歌曲，再次单击<FONT face="Times New Roman">“</FONT>选择音乐<FONT face="Times New Roman">”</FONT>则以前所选全部音乐将不可播放。<o:p></o:p></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-INDENT: 24pt; TEXT-ALIGN: left; mso-char-indent-count: 2.0; mso-pagination: widow-orphan" align=left> <o:p></o:p></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; TEXT-INDENT: 20pt; TEXT-ALIGN: left; mso-char-indent-count: 2.0; mso-pagination: widow-orphan" align=left>还有附件见下面帖子<o:p></o:p></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><o:p><FONT face="Times New Roman"> </FONT></o:p></P>
<FONT face=宋体>
<P><SPAN style="FONT-SIZE: 10pt; COLOR: blue; mso-bidi-font-size: 9.0pt">自动绘制横断面图<SPAN lang=EN-US>”软件更新(XP样式菜单)附件<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p></SPAN></P>
<P>最后一附件：<SPAN lang=EN-US>HookMenuCtl.part2.rar共4个</SPAN></P>
<P>黄玉宏 二○○六年十一月八日<SPAN lang=EN-US><o:p></o:p></SPAN></P>
<P></FONT></SPAN> </P> <P>请楼主上传软件，或是介绍一下思路。</P> <P>回复三楼：</P>
<P>因网站只能一次5个每个100K附件容量限制，软件全部为上述4个附件组成，如下载请下载全部4个附件！谢谢大家！</P>
<P>黄玉宏 二○○六年十一月十一日</P> <P>请楼主上传软件，或是介绍一下思路。</P> <P>请楼主上传软件，或是介绍一下思路。</P> 请楼主上传软件 请楼主上传软件 向楼主学习。 <p>请楼主介绍一下思路。</p>
页:
[1]
2