有关限制Edit输入的问题？（我有点迷糊）(100分)

hlc_alf · 2003-04-27

我想问一下，在用Edit控件时可以在其OnKeyPress事件中对输入进行控制，
如我想控制只让其输入整数可以写成if not (key in ['0'..'9'],#8) then key:=#0;
那么如果我想让其可以输入小数点(.)，该如何改写此语句呢？小数点可以表示成#多少呢？盼赐教！

大致若鱼 · 2003-04-27

if not (key in ['0'..'9','.',#8]) then key:=#0;

yanghaijun · 2003-04-27

'.'表示不行吗?

yanghaijun · 2003-04-27

我写的时间在前,为什么ID还在后?

大致若鱼 · 2003-04-27

又及，小数点是#46.
也可以写成这样 if not (key in ['0'..'9',#46,#8]) then key:=#0;

大致若鱼 · 2003-04-27

to yanghaijun:
什么意思？不明白。

dedema · 2003-04-27

你可以在Edit的onexit事件中，
来判断一个Edit.text是不是一个数字字符串的。
用Val函数来判断的。

yanghaijun · 2003-04-27

来自：大致若鱼, 时间：2003-4-27 11:52:00, ID：1806822
^^^^^^^^^^^^^^^^^^^
来自：yanghaijun, 时间：2003-4-27 11:51:00, ID：1806832
^^^^^^^^^^^^^^^^^^^^
你自己看看嘛

大致若鱼 · 2003-04-27

呵呵，我后来又编辑过的。第一次发的时候比你早一点：）

yanghaijun · 2003-04-27

jdelphi · 2003-04-27

大致若鱼,yanghaijun回答正确。给分。