edit控件重载输入数字根据网上提供的进行修改,供初学者学习修改VCL控件