一个关于空记录的的问题！

在button1的onclick中写
if edit1.text=<> then exit;

解决方案 »

  1.   

    不是这个样子？这样写了以后，即使我输入东西，那个Button 还是无效，不能增加了！
      

  2.   

    我知道了,你是说你想用控制
    你可以在edit的change事件中写
    if trim(edit.text)='' then button1.enabled:=false else button1.enabled:=true;
      

  3.   

    edit的change事件中还可以这样写
    button1.enabled=not (trim(edit.text)='')
      

  4.   


    Button1.enabled:=false;procedure TForm1.Edit1Change(Sender: TObject);
    begin
       if Edit1.text<>'' then
          Button1.enabled:=true
       else
          Button1.endable:=falseend;
      

  5.   

    我不用写Edit的Change事件？他报错！
    cannot find implementaion of method edit1change?
    请问这是个什么问题？
      

  6.   

    你把我的代码重新在程序中敲一遍吧，
    前面的Button1.enabled:=false;是不要的。