------我用delphi做了个计算器,计算器有个edit1,我已经搞定了edit1内只允许有一个小数点,负号只能是第一位,就差这个问题了,,(edit只能输入8位)
------这个问题是,如果用户输入了0.000000,那么程序会出错,就是edit1内必须要有个1到9的数字,不得出现0.0000或者0.00之类的,
------就比如要有0.001或0.022之类的数字,用数学的语言就是,必须要有一位以上的"有效数字"
------给出你的修改方法,要有代码.
我的描述还有什么不详细的地方大家再指出把,,谢谢啦
楼上回答的嘛?
我给出限制 只允许输入一个小数点, 只允许输入一个负号并且负号在最前面, 而且限制只能输入8个字符的程序
try
StrToFloat((Sender as TEdit).Text);
except
(Sender as TEdit).Text:=Copy((Sender as TEdit).Text,1,
Length((Sender as TEdit).Text)-1);
(Sender as TEdit).SelStart:=Length((Sender as TEdit).Text);
end;