Question

delphi 请问如何使EDIT1.TEXT里面的值只是数字??

比如输入数量,再计算总价.
谢谢

Answer 1

限制它只能输入数字就行了,在开始中输入代码如下:
var
fstyle: dWord;
begin
fstyle := GetWindowLong(Edit1.Handle, GWL_STYLE);
SetWindowLong(Edit1.Handle, GWL_STYLE, fstyle or ES_NUMBER)