飞诗(fsxm)
发表于 2009-5-6 20:40:00
<p>下面可以取得<br/>1.托动到窗口加载<br/>2.appload加载<br/>两种加载方式的路径～！FSTL就是用这个实现纯绿色模式</p><p>;;取得加载路径<br/>(defun fstl_getmepath (/ n1 n2 reg str)<br/> (while (/= 0 (getvar "cmdactive")) (command))<br/> (princ "\n")<br/> (setq str (getvar "lastprompt"))<br/> (if (wcmatch (strcase str) "*(LOAD \"*")<br/> (setq n1 (vl-string-search "(LOAD \"" str)<br/> n2 (vl-string-search "\")" str)<br/> str (substr str (+ n1 8) (- n2 n1 7))<br/> str (vl-string-translate "/" "\\" str)<br/> )<br/> (setq reg (strcat "HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\"<br/> "CurrentVersion\\Explorer\\ComDlg32\\OpenSaveMRU\\*"<br/> )<br/> str (substr (vl-registry-read reg "MRUList") 1 1)<br/> str (vl-registry-read reg str)<br/> )<br/> )<br/>)</p><p><strong><font face="Verdana" color="#61b713">coolyxw:你好！</font></strong></p><p>问题一：我还有Ｎ多人用过Ｎ次都没有出现＂异常＂</p><p>问题二：好的啊！在6月1号更新时就加上这个功能！</p><p>问题三：我还有Ｎ多人用过Ｎ次都没有出现＂异常＂</p><p>另：多行显示问题因为受到DCL功能所限无法实现</p><p>1.程序项现在不是只能显示9行！只要你自己加入多少行就会显示多少行哦！你自己测试吧！</p><p>2.右键功能因为受到DCL功能所限无法实现．</p><p>3.可以实现，但因为很少用到，所以没有去做这个功能！</p><p>4.你说的是非模态的吧？我可以用vba做一个给大家测试一下！</p>
飞诗(fsxm)
发表于 2009-5-9 18:29:00
<p>发一个我改写过的小程序：</p><p>复制块内实体，支持块内属性，标注等．不支持非等比块！</p><p>点两次同一物件就不复制了．</p><p></p><p></p>
XIAOFEILONG
发表于 2009-5-9 18:52:00
上面的程序和ET工具中的NCOPY不是一样的吗?
coolyxw
发表于 2009-5-11 00:33:00
蛮奇怪的，问题一和三我那天试验时点取消要好多回才能取消，刚加载时，也看到飞诗的提示有好多行。是不是因为当时我开了多个窗口后，再其中一个窗口加载程序，就会有这种现象。
coolyxw
发表于 2009-5-25 19:20:00
提个建议：有很多的程序我们一般会另设个文档写入该软件的相关说明。如果本软件的程序注释能读取相应的文档并显示出来，应该很方便我们对程序的整理。
飞诗(fsxm)
发表于 2009-5-25 21:26:00
<p>这个功能不难，！</p><p>只是现在很少有人去管他程序是谁写的！只想拿来能用就成！</p><p>就是程序下面的作者信息我想都没有几个人去填写的吧？</p><p>另：</p><p>飞诗fstl v1.3出来了!加入了你说说的功能：双击直接执行！</p><p>还有你可以将你的注册码给我，帮你注册一下永不过期！</p><p>以谢谢你对FSTL一直以为的关注与支持！</p><p>注：</p><p>今后只是要被采用的建议，建议者都可得荣誉版注册码一个！荣誉专用，永过过期！</p><p>还有就是：非荣誉版过期也可以正常使用，但会跳出软件更新提示！</p><p></p>
nonsmall
发表于 2009-5-26 12:37:00
<p>下来试一次 ACAD2004:</p><p>命令: FSTL_RUN_LAST ; 错误: 参数类型错误: VLA-OBJECT #<%catch-all-apply-error%></p>
coolyxw
发表于 2009-5-26 15:29:00
又来提问题了:循环执行问题<br/>Command: fstl_run_last<br/>飞诗正在为你执行【秋枫批量打印】<br/>加载Lisp->C:\civil\fstl1.2\Program\块层群组\BatchPlotv3.3.7\BatchPlot.VLX<br/><br/>Command:<br/>Command: batchplot Unknown command "BATCHPLOT". Press F1 for help.<br/><br/>Command: fstl_run_last<br/>飞诗正在为你执行【秋枫批量打印】<br/>加载Lisp->C:\civil\fstl1.2\Program\块层群组\BatchPlotv3.3.7\BatchPlot.VLX<br/>死循环了，但esc可让其退出。<br/><br/>对Program下的多级文件包类的单个文件支持似乎没问题，但是对多个文件支持似乎有问题<br/>我试了BatchPlotv3.3.7，因其增加了个ini设置文件，在fstl中增加了其附加目录以及附加文件ini（下拉单中似乎不支持该格式）均不能执行该文件。包括在cad中直接加载执行也不行。但在支持文件中加上后即可运行该文件。<br/><br/>程序管理项中备注信息若较长，不能完整显示。应可自动增加水平滚动条。<br/><br/>程序的备注信息确实还是有文字个数限制。此备注信息要是能与具体的文档关联并显示出来就完美了。毕竟我们通常下载程序时会有文档对程序进行说明.<br/><br/>增加程序项选择程序时，能否将可支持的文件类型都罗列出来，不要单lsp或是单vlx罗列，相对麻烦。<br/><br/>增加对绿色可执行小软件的支持，类似程序中的计算器。<br/><br/><br/>
coolyxw
发表于 2009-5-26 15:34:00
谢谢飞诗厚爱,能不能发两个注册码?一个家里用,一个单位用
飞诗(fsxm)
发表于 2009-5-26 17:27:00
<p><strong><font face="Verdana" color="#61b713">nonsmall:</font></strong></p><p>你下载的是过期的版本么？过期了的就会出现你说的现像！在使用期内是不会的！</p><p><strong><font face="Verdana" color="#61b713">coolyxw：</font></strong></p><p>1.循环执行问题在1.2是存在这个现象！</p><p>但只出现在你填写了一个错误的原始命令！</p><p>比如＂BATCHPLOT＂命令本来就不存在！（可能是BatchPlot.VLX文件损坏，所以加载失败）</p><p>请下载1.3，循环执行问题解决了！</p><p>2.备注信息,没有人会去写很长的哈！ＤＣＬ功能上不能实现水平滚动条！</p><p>3.好的！在下一版本中做到可以加载绿色可执行小软件！</p>
页:
1
2
3
4
5
6
7
[8]
9
10
11
12
13