我爱你王子呀 发表于 2015-9-11 15:56:48

查找图形的最大最小坐标

1.各位大神,大家下午好,小弟先这厢有礼了
2.本人是lisp的菜鸟,现在想编写一个自动绘制图框的程序。具体来说就是选取图形以后,自动绘制一个矩形的图框,要求所选取的图形都在图框内,且图框不能太大?我想了一下,如果要实现这个目的,需要分别找出所选图形的X最大最小坐标和Y的最大最小坐标,这个算法是什么?还望大神们不吝赐教呀。本人想了好久,在百度上也找了很久,没找出来


http://bbs.mjtd.com/xwb/images/bgimg/icon_logo.png 该贴已经同步到 我爱你王子呀的微博

我爱你王子呀 发表于 2015-9-11 16:09:19

我刚看了一个帖子,对我有所启发,就是得到框选图形的长宽尺寸,这个怎么获得呢?

ZZXXQQ 发表于 2015-9-11 16:32:58

;...
(command "ZOOM" "E" "REGEN")
(setq pmin (getvar "EXTMIN"))
(setq pmax (getvar "EXTMAX"))
;...

Gu_xl 发表于 2015-9-11 16:34:45

XLRX-PickSet-GetBox
   功能: 返回选择集或图元名对象包围框
   语法:(XLRX-PickSet-GetBox ss/ename )
   参数:
       ss/ename 选择集/图元名
       offse 可选参数,包围框外偏移距离
    返回值: 点表 '(左下 右上)

用法示例
    (XLRX-PickSet-GetBox (ssget))

我爱你王子呀 发表于 2015-9-11 20:29:54

Gu_xl 发表于 2015-9-11 16:34 static/image/common/back.gif
XLRX-PickSet-GetBox
   功能: 返回选择集或图元名对象包围框
   语法:(XLRX-PickSet-GetBox ss/ename ...

Gu_xl 大神 您好 您能回复 我不胜感激 小弟没想到 您作为版主 这么敬业
你在帖子 http://bbs.mjtd.com/thread-84595-3-1.html 第3页 第24楼 提到一个自动图框的源码 其中有一条代码是 (apply 'mapcar (cons 'list (list p1 p2))) 我把 p1 设为 (10 20) p2 设为(30 40) 结果是((10 30) (20 40)) 小弟想了几个小时都不得其解 还请您能指教一二 不胜感激
页: [1]
查看完整版本: 查找图形的最大最小坐标