如① ② ③ ④

szZxf · 发表于 2004-3-19 20:11:00

编一个lisp程序，如何随鼠标在屏幕上点随意的位置，自动标注出带圈的自动增加的数字（如① ② ③ ④……），并在触发SHIFT或其它键的时候数字能变成1-1 1-2 ……，放开shift又变成2 3 4 ……

meflying · 发表于 2004-3-19 20:47:00

第二个很难实现

yxp · 发表于 2004-3-19 22:35:00

LISP不是万能的,试试vba还差不多.

my_computer · 发表于 2004-3-20 23:07:00

其实不难，你可以研究一下grread 函数。

zcjhy · 发表于 2004-3-20 23:17:00

看看第一个的情况，附件，功能应该都有了
还有就是可以追加设定起始值的输入，自己去扩展吧
关于第二个我想只要知道键盘的响应，就可以将文本的内容替换
关键就是如何得到键盘的响应，我以前也没用过
哪位有见解的发个贴

请先注册会员后在进行下载

已注册会员，请先登录后下载

文件名称:xwk3lnppi3t.lsp
下载次数:0 文件大小:705 Bytes 售价:2银币 [记录]
下载权限: 不限以上或 Vip会员 [开通Vip] [签到领银币] [免费赚银币]

meflying · 发表于 2004-3-21 08:44:00

首先,使用grread函数就需要运行程序,而不是触发的...
另外,grread函数不会响应shift的输入

my_computer · 发表于 2004-3-21 19:01:00

首先，他提到了是编译个程序，应该是在程序的运行时作这些事吧！！
其次，我首先对自己没有测试shift的问题表示道歉。我想他不一定非使用shift不可吧，换成其他按键就好了。