[求助]：请教一个小问题

c3a139 · 发表于 2006-10-5 16:32:03

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

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

×

请问.kwx是什么文件？

haibinpro · 发表于 2006-10-5 22:50:32

没见过，你确定和cad有关么？

c3a139 · 发表于 2006-10-6 08:04:42

是的，看如下这段代码谁能解释一下
(setq f (getfiled "输入文件名:" "D:/" "*" 8))
  (setq filemzf (substr f 1 1))
  (setq k 1)
  (while (/= filemzf "")
(if (= filemzf ".")
   (progn (setq filemzf ""))
   (progn (setq k (1+ k)) (setq filemzf (substr f k 1)))
)
  )
  (setq filez (substr f 1 (1- k)))
  (setq f3 (strcat filez ".kwx"))
  (setq f2 (open f3 "w"))
  (wRiTe-line "[KTD_DAT]" f2)
  (wRiTe-line "KT_TYPE=ZK" f2)

zml84 · 发表于 2006-10-6 09:42:51

".kwx"
有你上面程序片段可知，这是一个你自定义的扩展名。

c3a139 · 发表于 2006-10-6 11:10:20

它有什么作用，有人知道不

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

[求助] [求助]：请教一个小问题

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

相关帖子