cass中“提取坐标”

xuxuace · 发表于 2011-11-27 21:18:00

cass工程应用中有一项是“指定点生成数据文件”
问题是这功能中在“输入点号”的时候都是数字类型的
怎么能在“输入点号”时打汉字

newbuser · 发表于 2012-3-31 11:24:45

怎么没有高手应答呢？我帮你顶一下。

xujinhua · 发表于 2012-3-31 12:05:13

本帖最后由 xujinhua 于 2012-3-31 12:08 编辑

直接输入不行..只接受非0数...
你输入地物代码的时候..输入你想要的汉字..
然后把数字全部删掉...然后根据你输出的文件..那里有座标和地物代码用lsip重新把地物代码的汉字生成出来.....

xujinhua · 发表于 2012-3-31 16:04:00

  (defun c:sc()
(setq file_id (open "c:\\数据输出.TXT" "a"))
  (setq xx(getpoint "\n文字位置:"))
  (setq xx1 (getreal "\n文字大小:"))
(setq xb (getreal "\n标地圆大小:"))
  (while xx
(setq file_id (open "c:\\数据输出.TXT" "a"))
(setq xu (getstring "\n文字内容:"))
(command "text" xx xx1 "0" xu "")
(command "circle" xx xb)
(princ xu file_id)
(princ "," file_id)
(princ xx file_id)
(princ "\n" file_id)
(close file_id)
(setq xx(getpoint "\n下一个文字位置:"))
)
)

类似的功能....保存在c:\数据输出

账号		自动登录	找回密码
密码			注册