两个edit比较后我让button1显示不相等button2不能执行,怎么让button2的功能不能执行呢,否则相反

解决方案 »

  1.   

    button2.enable,属性,控制控件的可用与不可用,不知道你是否是想这样
      

  2.   

    置 enable=false,或者button2的click中判断一个变量if (xxx) then Exit;
      

  3.   


    if edit1.text <> edit2.text then
    begin
      button1.caption :='不相等';
      button2.enable := false;
    end else 
    begin
      button2.enable := true;
    end;是这样吧,不过不明白你为什么要让button1上显示不相等
    这个提示信息显示在lable里面或者用messagebox提示比较好吧
      

  4.   


    if edit1.text <> edit2.text then
    begin
      button1.caption :='不相等';
      button2.enable := false;
    end else 
    begin
      button2.enable := true;
    end;是这样吧,不过不明白你为什么要让button1上显示不相等
    这个提示信息显示在lable里面或者用messagebox提示比较好吧
      

  5.   

    比较EDIT1 和 EDIT2的值
    不相等设置BUTTON的 ENABLE属性为假
    如同5楼代码一样