找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 6012|回复: 53

[每日一码] 获取Sortents

[复制链接]
发表于 2014-12-14 17:24:40 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
游客,如果您要查看本帖隐藏内容请回复

_$ (vlax-dump-object (sortents) t)
; IAcadSortentsTable: AutoCAD AcadSortentsTable 接口
;特性值:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 00d73d3c>
;   Document (RO) = #<VLA-OBJECT IAcadDocument 32a4f4a8>
;   Handle (RO) = "1B2"
;   HasExtensionDictionary (RO) = 0
;   ObjectID (RO) = 2125558672
;   ObjectName (RO) = "AcDbSortentsTable"
;   OwnerID (RO) = 2125558664
;支持的方法:
;   Block ()
;   Delete ()
;   GetExtensionDictionary ()
;   GetFullDrawOrder (2)
;   GetRelativeDrawOrder (2)
;   GetXData (3)
;   MoveAbove (2)
;   MoveBelow (2)
;   MoveToBottom (1)
;   MoveToTop (1)
;   SetRelativeDrawOrder (1)
;   SetXData (2)
;   SwapOrder (2)
T
_$

评分

参与人数 1D豆 +5 收起 理由
newer + 5 很给力!经验;技术要点;资料分享奖!

查看全部评分

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!

已领礼包: 40个

财富等级: 招财进宝

发表于 2014-12-14 17:25:39 | 显示全部楼层
支持!!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复

使用道具 举报

发表于 2014-12-14 17:30:11 | 显示全部楼层
悄悄拿走,不算伸手党
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 604个

财富等级: 财运亨通

发表于 2014-12-14 17:30:26 来自手机 | 显示全部楼层
什么是Sortent. ?

点评

命令draworder , 调整显示顺序,这个顺序就是在这个表里面。  详情 回复 发表于 2014-12-14 17:46
看代码跟词典有关...  详情 回复 发表于 2014-12-14 17:44
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2476个

财富等级: 金玉满堂

发表于 2014-12-14 17:35:29 | 显示全部楼层
只要有空就来挖宝...{:soso_e120:}

点评

你有什么宝贝也拿出来亮亮啊,水涨船高嘛。  详情 回复 发表于 2014-12-14 17:37
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

发表于 2014-12-14 17:37:37 | 显示全部楼层
q3_2006 发表于 2014-12-14 17:35
只要有空就来挖宝...

你有什么宝贝也拿出来亮亮啊,水涨船高嘛。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2476个

财富等级: 金玉满堂

发表于 2014-12-14 17:40:59 | 显示全部楼层
我哪有什么宝贝...代码都写得很不入流...{:soso_e110:}

点评

那你也有收藏嘛,我提供的那些也都是自己的收藏啊,也不是我自己写的。  详情 回复 发表于 2014-12-14 17:45
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2476个

财富等级: 金玉满堂

发表于 2014-12-14 17:44:39 | 显示全部楼层

看代码跟词典有关...
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

发表于 2014-12-14 17:45:22 | 显示全部楼层
q3_2006 发表于 2014-12-14 17:40
我哪有什么宝贝...代码都写得很不入流...

那你也有收藏嘛,我提供的那些也都是自己的收藏啊,也不是我自己写的。

点评

ID不是我注册的....在晓东也只混了两年......如果说有收藏也都是这里找的....  详情 回复 发表于 2014-12-14 17:56
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

发表于 2014-12-14 17:46:12 | 显示全部楼层

命令draworder , 调整显示顺序,这个顺序就是在这个表里面。

点评

;;关键的问题是,怎么用?有示例吗?;;(vlax-dump-object (sortents) t) (defun Sortents (/ dc sortents) (or *ACAD* (setq *ACAD* (vlax-get-acad-object))) (or *DOC* (setq *DOC* (vla-get-ActiveDocumen  详情 回复 发表于 2014-12-16 10:58
那明天上班好好学习一下  详情 回复 发表于 2014-12-14 17:49
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 604个

财富等级: 财运亨通

发表于 2014-12-14 17:49:38 来自手机 | 显示全部楼层
newer 发表于 2014-12-14 17:46
命令draworder , 调整显示顺序,这个顺序就是在这个表里面。

那明天上班好好学习一下
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2476个

财富等级: 金玉满堂

发表于 2014-12-14 17:56:46 | 显示全部楼层
newer 发表于 2014-12-14 17:45
那你也有收藏嘛,我提供的那些也都是自己的收藏啊,也不是我自己写的。

ID不是我注册的....在晓东也只混了两年......如果说有收藏也都是这里找的....{:soso_e127:}
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 604个

财富等级: 财运亨通

发表于 2014-12-16 10:58:51 | 显示全部楼层
newer 发表于 2014-12-14 17:46
命令draworder , 调整显示顺序,这个顺序就是在这个表里面。

;;关键的问题是,怎么用?有示例吗?;;(vlax-dump-object (sortents) t)
(defun Sortents        (/ dc sortents)
  (or *ACAD* (setq *ACAD* (vlax-get-acad-object)))
  (or *DOC* (setq *DOC* (vla-get-ActiveDocument *ACAD*)))
  (setq dc (vla-getextensiondictionary (vla-get-modelspace *DOC*)));(vlax-get dc 'count)
  (setq sortents (vl-catch-all-apply 'vla-item (list dc "ACAD_SORTENTS")));(vla-item dc 0)
  (if (vl-catch-all-error-p sortents)
    (vla-addobject dc "ACAD_SORTENTS" "AcDbSortentsTable")
    sortents
  )  
)



1.png
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 1268个

财富等级: 财源广进

发表于 2014-12-16 11:02:53 来自手机 | 显示全部楼层
/db_自贡黄明儒_ 发表于 2014-12-16 10:58
;;关键的问题是,怎么用?有示例吗?;;(vlax-dump-object (sortents) t)
(defun Sortents        (/ dc sortent ...

置顶movetotop
置底
交换
……
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 1268个

财富等级: 财源广进

发表于 2014-12-16 12:19:58 | 显示全部楼层
/db_自贡黄明儒_ 发表于 2014-12-16 10:58
;;关键的问题是,怎么用?有示例吗?;;(vlax-dump-object (sortents) t)
(defun Sortents        (/ dc sortent ...


选择置顶
  1. (defun c:tt (/ ss )
  2.   (defun ss->objs (ss / l el e)
  3.     (setq l (sslength ss))
  4.     (while (setq e (ssname ss (setq l (1- l))))
  5.       (setq el (cons e el))
  6.     )
  7.     el
  8.   )
  9.   (if (setq ss (ssget))
  10.     (progn
  11.       (vla-movetotop
  12.         (sortents)
  13.         (vlax-safearray-fill
  14.           (vlax-make-safearray
  15.             vlax-vbobject
  16.             (cons 0 (1- (sslength ss)))
  17.             (ss->objs ss)
  18.           )
  19.         )
  20.       )
  21.     )
  22.   )
  23.   (princ)
  24. )

评分

参与人数 1D豆 +5 收起 理由
/db_自贡黄明儒_ + 5 很给力!经验;技术要点;资料分享奖!

查看全部评分

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

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

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-12-27 09:56 , Processed in 0.499864 second(s), 59 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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