用ObjectDBX搜索指定目录是含特定文字的图形不用打开文件,就可以对文件进行操作.包括打开文件获取实体,修改实休,保存文件以下是关键代码:;;;创建ObjectDBX实例(setqdbxdoc(vla-GetInterfaceObject(vlax-get-acad-object)"Obj...
10 用ObjectDBX搜索指定目录是含特定文字的图形
xian001 2018.05.10 CAD代画技巧集锦 抢沙发 2419人打酱油
04 列出AutoCAD内部函数
xian001 2018.05.04 CAD代画技巧集锦 抢沙发 1765人打酱油
一个方便,实用,能列出AutoCAD内部函数的小程序 (defunc:test()(setqfunn(getstring"\nFunctionName<*>:"))(if(=funn"")(setqfunn"*"))(setqfl(vl-remove-if-not(functio...
02 用CAD辅助ETABS建模的方法
xian001 2018.05.02 CAD代画技巧集锦 抢沙发 2984人打酱油
今天在做一个坡道,刚学ETABS不久.所以觉得在ETABS里面建模是比较麻烦的.刚刚发现一个好方法,不敢独享,特来告知大家.先用在CAD里面建好模型.我想在CAD里面建总比在ETABS里面快好多吧.而且懂的LISP的同志还可以用LISP自动生成你要的模型.然后在CAD里面把梁断面都用不同的图层...
30 getstrings输入字符的时候,再有默认字符
xian001 2018.04.30 CAD代画技巧集锦 抢沙发 2180人打酱油
有的时候,想修改一个字符串,可以又不想全部输入.这时候如果想不用对话框的话,就可以试试以下的办法.用SENDKEYS这个函数,可以事先输入一些字符串.当时,如果是中文的话,可能还有点问题. Quote (defunc:tt()(SENDKEYS"aabb")(GETSTRING"\...
28 基础工程,基坑支护常用数据
xian001 2018.04.28 CAD代画技巧集锦 抢沙发 1938人打酱油
1.土的抗剪强度指标的工程数值：砂土的内摩擦角j变化范围不是很大，中砂、粗砂、砾砂一般为j=32°～40°；粉砂、细砂一般为j=28°～36°。孔隙比愈小，j愈大，但含水饱和的粉砂、细砂很容易失去稳定，因此对其内摩擦角的取值宜慎重，有时规定取j=20°左右。砂土有时也有很小的粘聚力（约10kP...
26 DCL对话框简化编程
xian001 2018.04.26 CAD代画技巧集锦 抢沙发 2401人打酱油
在程序中对于对话框是很麻烦的事情.如果全部用LISP来写对话框就方便了.以下就是个例子.每一行就是一个控件(list变量名提示语变量类型)例1:(list"is_wpj""wpj*.dwg""bool")例2:(list"other-scale""放大倍数""int")当变量名为nil时表示...
24 CAD开发的一些建议
xian001 2018.04.24 CAD代画技巧集锦 抢沙发 1752人打酱油
今天试用了一个后处理软件．功能很强大，很好．这里主要提个个人想法．软件界面上面按钮很多，可选的参数非常多．从一个角度来讲，是个好事，可以充分的自定义．另一个角度来讲，也不是个好事．因为要花足够的时间来理解各个参数的用处．ＰＳ：我现在还没有办法使用上该软件．我自认为使用软件，我会比其他人更容易上...
搜索
日历
2024年04月
