【已解决】请老师看看这个自动显示计算结果的窗体为何出错

wdmzslw · 发表于 2018-6-4 22:35:06

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

×

本帖最后由 wdmzslw 于 2018-6-21 23:57 编辑

我想设计一个窗体，在其中的文本框中输入算式，下面的标签中自动计算结果。但是为何只能计算整数，不能计算带小数和函数的算式呢？还有中间输入过程中如果等式不完整会出错，如何在等式不完整出错的时候不显示，只有等式完整了再显示呢？

newer · 发表于 2018-6-4 23:10:50

(dcl-Control-SetCaption bbb (cal NewValue))
这个地方改
(dcl-Control-SetCaption bbb (xd::vla:catchapply 'cal (list NewValue)))
试试

newer · 发表于 2018-6-4 23:16:44

命令: (xd::vla:catchapply 'cal (list "23.3+32.3"))
55.6

wdmzslw · 发表于 2018-6-4 23:18:23

newer 发表于 2018-6-4 23:10
(dcl-Control-SetCaption bbb (cal NewValue))
这个地方改
(dcl-Control-SetCaption bbb (xd::vla:catcha ...

还是出错

wdmzslw · 发表于 2018-6-4 23:27:28

newer 发表于 2018-6-4 23:16
命令: (xd::vla:catchapply 'cal (list "23.3+32.3"))
55.6

(xd::vla:catchapply 'cal (list "23.3+32.3"))单独运行这个命令没有问题，放到程序里就出错了

marting · 发表于 2018-6-4 23:29:18

本帖最后由 marting 于 2018-6-4 23:30 编辑

wdmzslw 发表于 2018-6-4 23:18
还是出错

(cal NewValue) 这个返回的是实数或者整数
而setCaption要求的是字符串，你不转换，当然出错了。

wdmzslw · 发表于 2018-6-4 23:43:08

marting 发表于 2018-6-4 23:29
(cal NewValue) 这个返回的是实数或者整数
而setCaption要求的是字符串，你不转换，当然出错了。

呵呵，还是老师厉害。第一个问题解决了。但是在输入的过程中，比如：输入“2.5*”的时候就提示出错了，能不能在算式不完整出错时不提示错误：

命令: 错误:

意外的表达式结尾
; 错误: 参数类型错误: numberp: T

marting · 发表于 2018-6-4 23:46:02

wdmzslw 发表于 2018-6-4 23:43
呵呵，还是老师厉害。第一个问题解决了。但是在输入的过程中，比如：输入“2.5*”的时候就提示出错了，能 ...

你是在回调里面调用CAL的啊，就是你输入一个字符，CAL就计算一次，计算 "2.0*" 肯定要错啊，你加个判断，判断下符号前后都有数字的时候，在调用CAL去计算。

marting · 发表于 2018-6-4 23:47:10

wdmzslw 发表于 2018-6-4 23:43
呵呵，还是老师厉害。第一个问题解决了。但是在输入的过程中，比如：输入“2.5*”的时候就提示出错了，能 ...

或者说，字符串以数字开头，以数字结尾的时候，你再调用CAL

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

[求助] 【已解决】请老师看看这个自动显示计算结果的窗体为何出错