社区 › 源码共享 › 型材参数特性如何写入表内

好好-MEN 发表于 2021-7-26 11:01:11

xinhaichun 发表于 2021-7-26 17:52:39

第1步：计算截面参数（你需要的Ix,Wx,Area之类的），形成数据点对
第2步：创建图块（同时创建属性定义，或者提前做好属性块）
第3步：截面参数的数据点对，匹配到属性块的标记，修改其值

USER2128 发表于 2021-7-27 08:23:43

试试将：
(setq KWORD (STRCASE (GETSTRING "\n是否写入标准图框特性表内（Y/N）： <N>" ) ))
(if (= KWORD nil )
(PROGN   (setq KWORD "N") ))
改为：
      (or (initget "Y N")
          (setq KWORD (GETkword "\n是否写入标准图框特性表内（Y/N）/<N>：" ))
          (setq KWORD "N")
          )

好好-MEN 发表于 2021-7-27 12:11:43

好好-MEN 发表于 2022-3-25 12:54:43

bssurvey 发表于 2022-3-25 14:39:09

把 (setq NEWSTR (STRCAT FENMU_VALUE ":" FENZI_VALUE )) 刪除就可以了

查看完整版本: 型材参数特性如何写入表内