乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 38|回复: 1

求助!

[复制链接]
3kd

7

主题

40

帖子

4

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
68
发表于 2003-6-10 18:56:00 | 显示全部楼层 |阅读模式
怎样才能提出块中定义的属性值?然后作为字符串。
在图元属性中怎么没有呀?班主!快快告诉我吧,我等着急用呀!
回复

使用道具 举报

29

主题

1152

帖子

10

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1268
发表于 2003-6-11 08:12:00 | 显示全部楼层
;;VxGetAtts - Reads all attribute values from a block
;; -- Function VxGetAtts
;; Reads all attribute values from a block
;; Copyright:
;;   ?000 MENZI ENGINEERING GmbH, Switzerland
;; Arguments [Typ]:
;;   Obj = Object [VLA-OBJECT]
;; Return [Typ]:
;;   > Dotted pair list '(("Tag1" . "Val1")...) [LIST]
;; Notes:
;;   None
;; usage: (vxgetatts (vlax-ename->vla-object (car (entsel))))
(defun VXGETATTS (OBJ)
  (mapcar
    '(lambda (ATT)
       (cons (vla-get-tagstring ATT)
             (vla-get-textstring ATT)
       )
     )
    (vlax-invoke OBJ "GetAttributes")
  )
)
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-3 11:36 , Processed in 0.561341 second(s), 56 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表