明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1480|回复: 4

[LISP群(2)] 2013-05-05 明经 AutoLISP 编程②群(177027547) 群聊记录:运行CAD程序,如何释放内存呢

 关闭 [复制链接]
发表于 2013-5-5 17:17:14 | 显示全部楼层 |阅读模式
漫步苍穹 17:17:14
运行CAD程序,如何释放内存呢
我的运算量太大了,后头运算越来越慢
漫步苍穹 17:18:20
以上问题请教各位高手
 楼主| 发表于 2013-5-5 18:51:38 | 显示全部楼层
[031346]七里台 18:51:38
少算点
[ZZXXQQ] 18:52:56
(gc)
 楼主| 发表于 2013-5-5 21:23:25 | 显示全部楼层
[baiyier1112]枫之 21:23:25
请教一个函数:
想要将整个字符串替换成某个特定字符串,用什么函数?如果有类似的程序共享一下也可以
[辰] 21:25:45
(vl-string-subst new-str pattern string [start-pos])
[baiyier1112]枫之 21:25:58
谢谢。
 楼主| 发表于 2013-5-5 23:31:32 | 显示全部楼层
[baiyier1112]枫之 23:31:32
[woshilxh]爱摄影 23:32:48
肿么了?
[baiyier1112]枫之 23:33:07
实现不了。
[woshilxh]爱摄影 23:34:19
通常吧,我会把代码先集体替换成半角,把多个空格替换成单个空格,没准有惊喜啊
[baiyier1112]枫之 23:34:52
%%1306@150,替换@前面的直径可以,我修改了一下,替换后面的150,就不行了
[woshilxh]爱摄影 23:35:51
你最终目的是想把什么替换成什么啊?
[baiyier1112]枫之 23:36:31
把%%1306@150(2),%%1306@150,%%1308@150等等后面的150替换成200
[woshilxh]爱摄影 23:36:59
我也是新手,不过善意提醒下,没准需要转义字符呢
[baiyier1112]枫之 23:37:13
明经上我举的例子,是200替换成150
[baiyier1112]枫之 23:37:49
多谢
[baiyier1112]枫之 23:39:59
那个我也不知道怎么输入,通常我都拷贝。这里没有问题
[baiyier1112]枫之 23:40:29
估计问题就出在这里
(vla-put-TextString obj (strcat (substr str 1 (1+(vl-string-search "@" str)))"200"(substr str (3+(vl-string-search "@" str)))))
(vla-put-TextString obj (strcat (substr str 1 (1+(vl-string-search "@" str)))"200"(substr str (4+(vl-string-search "@" str)))))
[woshilxh]爱摄影 23:42:23
大哥不用发这么多了,我也是新手,虽然刚用lisp编写了一个软件间的模型转换接口,呵呵呵,我写程序一般都是用最笨的代码的,vlax都很少用,我感觉你用嘴传统的lisp写是不是成功率高些?
[baiyier1112]枫之 23:43:16
我非常新,指挥参考别人的改动一点点。自己不会写
[woshilxh]爱摄影 23:44:20
那就把代码分两部分把,@前面和后面各替换一次
[woshilxh]爱摄影 23:45:25
话说你直接用cad的替换也行啊
[baiyier1112]枫之 23:46:14
想更快捷一些,想把间距改为200,输入200,选择并回车搞定。
[woshilxh]爱摄影 23:47:55
这个也用不上吧,cad直接find一下
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-6 07:22 , Processed in 0.181445 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表