[求助]：屏幕菜单的使用

panzhongw · 发表于 2003-6-19 22:09:47

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

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

×

请教！
如何实时更新屏幕菜单的内容
比方说：1、在屏幕中画线时实时在屏幕菜单中显示线的长度
2、执行某LISP程序后在屏幕菜单中显示多项计算结果

zhynt · 发表于 2003-6-20 00:40:44

使用grtext函数可以将字符写到屏幕菜单去或状态行，具体语法是：
(grtext 参数一 "字符串"　参数二)
其中参数一指定字符串写入的位置，当为-1是写到状态行，为0时写到屏幕菜单的第一行余此类推，系统变量SCREENBOXES可以报告最大的屏幕菜单行号。参数一的有效范围为0～屏幕菜单最大行号加1。
参数二用来是否加亮显示，为0时不加亮，为1时加亮。（注：在有些平台上必须先将字符写到屏幕菜单上然后再加亮显示。
例如，如果要将“XDCAD”写到屏幕菜单的第２０行：
(grtext 21 "XDCAD")
要将其加亮：
(grtext 21 " " 1)
在例如要将１～１０写到屏幕菜单的第２～１１行：
(defun c:abc ()
  (setq _a 0)
  (setq _b 10)
  (while (/= _a _b)
(setq _a (1+ _a))
(grtext _a (itoa _a))
)
  )

cy956 · 发表于 2003-6-20 01:43:17

建议不要这样做。

zhynt · 发表于 2003-6-20 01:51:24

最初由 cy956 发布
[B]建议不要这样做。 [/B]

这是为什么呢？说具体一点好吗？这样做会有什么后果呢？

freeme · 发表于 2003-6-22 21:25:26

其实我觉得用快捷键加屏幕菜单画图比电击工具条快多了！！！

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

[求助] [求助]：屏幕菜单的使用

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

相关帖子