即可以使用StrToInt(Edit1.text)转换。
另外,我的edit里面初始化了一些文字。我想当鼠标选中它,即准备接受输入的时候,原来的文字就全部变蓝色或删除,这样可以直接输入,而不用一个一个删和用鼠标抹蓝。谢谢了~~~~
另外,我的edit里面初始化了一些文字。我想当鼠标选中它,即准备接受输入的时候,原来的文字就全部变蓝色或删除,这样可以直接输入,而不用一个一个删和用鼠标抹蓝。谢谢了~~~~
调试欢乐多
如果只允许输入数字 ,可在KeyPress事件里写上
if key not in ['0'..'9']
then abort
try
myNum := StrToInt(Edit1.text);
except
Edit1.Clear;
end;