返回选中单元格的内容用哪个函数?
(xdrx_table_textstring (car(entsel))) 返回的是整个表格的内容,我要返回选中单元格的内容用哪个函数?哪位大神知道,请指教(xdrx-table-hittest tbl pt '(0 0 1.0) 0.1 0.1))
(defun c:tt ()
(if (and (setq tbl
(car (xdrx-entsel "\nSelect Table<Exit>:" '((0 . "*table")))
)
)
(setq pt (getpoint "\nPick Cell<Exit>:"))
(setq cell (xdrx-table-hittest tbl pt '(0 0 1.0) 0.1 0.1))
)
(progn
(xdrx-prompt
(xdrx-string-formatex
"\nSelect Cell:%d,%d \nTextstring is:%s"
(car cell)
(cadr cell)
(apply 'xdrx-table-textstring (cons tbl cell))
)
)
)
)
(princ)
)
Command: TT
Select Table<Exit>:
Pick Cell<Exit>:
Select Cell:3 1
Textstring is:1649.0318
晓东老大,用xdrx-table-hittest 每次都返回(0,0),我用的是cad2007,不能返回单元格的行号和列号,直接用你的代码也返回不了
页:
[1]