Question

delphi的edit控件中实现除法功能

我想实现一个edit控件中显示值为一个运算了除法的值。
逻辑是这样的，
我添加要给edit控件显示值为，在另一个label控件中得出的值除以另一个label控件中所得到的值所得到的结果。
或者说有什么控件能实现我所说的效果。
TKS

Answer 1

问题太简单，没有人回答你。你这样做:
1、在界面上放三个edit控件，一个按钮控件，一个edit作为被除数输入，第二个作为除数输入。第三个显示结果。
2、在按钮的单击事件中，写上这么一句：
edit3.text:=currTostr(strTocurr(edit1.text)/strTocurr(edit2.text));currTostr把有小数点的数值转换为字符的函数。strTocurr则相反。
3、运行程序，先清空edit1和edit2中的字符，然后输入分别输入被除数和除数数，再单击按钮。第三个edit里就显示商了。

Answer 2

利用焦点可以实现