即可以使用StrToInt(Edit1.text)转换。
另外,我的edit里面初始化了一些文字。我想当鼠标选中它,即准备接受输入的时候,原来的文字就全部变蓝色或删除,这样可以直接输入,而不用一个一个删和用鼠标抹蓝。谢谢了~~~~

解决方案 »

  1.   

    呵呵用maskedit好了。设置它的值就可以光输入数字了。
      

  2.   

    我想先在里面初始化了一些汉字啊。请高手写几行代码嘛。刚开始学delphi,多多提拔啊!
      

  3.   

    用 Edit1.SelectAll 即可让字全部变成蓝色。
    如果只允许输入数字 ,可在KeyPress事件里写上 
    if key not in ['0'..'9'] 
    then abort
      

  4.   

    再onclick或者onenter里写上Edit1.SelectAll
      

  5.   

    再有个办法判断是不是数字, 用异常:
    try
      myNum := StrToInt(Edit1.text);
    except
      Edit1.Clear;
    end;