乐筑天下

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

在图纸空间中选择模型空间图元

[复制链接]

69

主题

875

帖子

15

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1146
发表于 2005-11-30 21:44:17 | 显示全部楼层 |阅读模式
大家好,
有人有从文件空间中选择视口中的模型空间实体的代码示例吗?(没有“激活”视口)

关于实现这样的东西的最佳方式有什么想法吗?
TIA,
Mick。

本帖以下内容被隐藏保护;需要你回复后,才能看到!

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

使用道具 举报

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2005-12-1 05:19:54 | 显示全部楼层
[半自动无效响应]
听起来像是个棘手的问题,米克
如您所知,我不是一个经常练习VBer的人,但我想不出任何方法来使用ActiveX对象模型实现这一点。
。也没有AutoLisp或.Net API工具
AutoDesk在其核心中找到了一种方法,因为关联标注和对象标注允许在图纸空间中选择对象
kwb
回复

使用道具 举报

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2005-12-1 05:31:19 | 显示全部楼层

您可以从自制的COM服务器包装此内容…
。此帖子中可能有太多的“可能”。
回复

使用道具 举报

69

主题

875

帖子

15

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1146
发表于 2005-12-1 06:17:48 | 显示全部楼层
谢谢Kerry,我之前(在arx lib标头等中)有过短暂的研究,运气不好,我“可能”不得不再试一次。
我记得一些关于从pspace转换为mspace的拾取点,并使用vba或lisp“在那个点”选择一个实体。从未使用过(读取编码)纸空间和视图端口,我不知所措,如果有人有一个,我会领先一步。
我的计划是针对.net的,但我在这里发帖,希望也许使用vba的人已经做了类似的事情,给我一个关于解决这个问题的最佳方法的提示或线索。
基本上,我想在mspace中选择一个实体来附加一个领导者或项目气球,其中包含实体的信息作为文本
谢谢,
Mick。
回复

使用道具 举报

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2005-12-1 06:29:49 | 显示全部楼层
你最终希望Mick用什么语言写这个?
正如Kerry所指出的,有一个未记录的功能可以做到这一点(体积测量).............干杯,格伦。
回复

使用道具 举报

116

主题

996

帖子

9

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1466
发表于 2005-12-1 07:14:42 | 显示全部楼层
不久前,我做了一件事,从图纸空间复制到模型空间,时间长到我需要搜索和刷新。修改起来应该相当简单。我会在今天午餐的时候找到它,看看我能做些什么。
回复

使用道具 举报

69

主题

875

帖子

15

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1146
发表于 2005-12-1 10:29:51 | 显示全部楼层

您的意思是只选择在视口中可见的实体(即尊重视口边界、剪辑、vplayer状态等)吗?
回复

使用道具 举报

69

主题

875

帖子

15

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1146
发表于 2005-12-1 10:32:52 | 显示全部楼层
迈克尔,我很确定情况就是这样。
回复

使用道具 举报

9

主题

25

帖子

1

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
61
发表于 2005-12-1 11:04:04 | 显示全部楼层
快速而肮脏:
  1. (defun MeGetEntsInVport ( / ExLoop LolPnt OffSet SelSet UprPnt VptCen VptEnl VptEnt)
  2. (while (not ExLoop)
  3.   (initget " ")
  4.   (setq VptEnt (entsel "\nSelect viewport: "))
  5.   (cond
  6.    ((= VptEnt "") (setq ExLoop T))
  7.    (VptEnt
  8.     (setq VptEnl (entget (car VptEnt)))
  9.     (if (= (cdr (assoc 0 VptEnl)) "VIEWPORT")
  10.      (progn
  11.       (setq VptCen (reverse (cdr (reverse (cdr (assoc 10 VptEnl)))))
  12.             OffSet (mapcar
  13.                    '(lambda (l) (/ (cdr (assoc l VptEnl)) 2.0)) '(40 41)
  14.                    )
  15.             LolPnt (trans (mapcar '(lambda (c o) (- c o)) VptCen OffSet) 3 2)
  16.             UprPnt (trans (mapcar '(lambda (c o) (+ c o)) VptCen OffSet) 3 2)
  17.             ExLoop T
  18.       )
  19.       (setvar "TILEMODE" 1)
  20.       (setq SelSet (ssget "_C" LolPnt UprPnt))
  21.       (setvar "TILEMODE" 0)
  22.      )
  23.      (prompt " selected entity is not a viewport.")
  24.     )
  25.    )
  26.    (T (prompt " 1 selected, 0 found."))
  27.   )
  28. )
  29. SelSet
  30. )

...编辑:糟糕,语言错误
回复

使用道具 举报

69

主题

875

帖子

15

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1146
发表于 2005-12-1 11:33:22 | 显示全部楼层
谢谢大家的回复。
最终,我想在C#中执行此操作,指出的未记录函数的唯一问题可能会变得obselete(?)。
几乎是Michael,我想在ms中选择一个实体,而在ps中,说一个带有att的块,并将其att用于领导者或项目气球上的项目编号。
谢谢 Jürg,我已经很久没有使用 lisp 了,我会给它一个旋风,让你知道。
塔,
米克.
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-7-5 00:20 , Processed in 0.373403 second(s), 73 queries .

© 2020-2025 乐筑天下

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