如图

解决方案 »

  1.   

    procedure TForm3.btnCloseClick(Sender: TObject);
    begin
         //action := cafree;
         //Form3.Close;
         Form3.Close;
         //FormClose;
    end;
    错误代码
    想在按钮中实现关闭窗体
      

  2.   

      你的Form3的close事件有代码么??
      

  3.   

    procedure TForm3.btnCloseClick(Sender: TObject);
    begin
      close;
    end;----出错就找找看你关闭时执行什么事件了
      

  4.   

    用F7逐行跟踪,看那行代码出错了.检查close;Destroy 事件中的代码.
      

  5.   

    肯定是你close里写了什么东西,也可能是前面有类的create,没有free就关闭窗口了
      

  6.   

    Form3.Close; 这样写是完全错误的。
    直接写close或者self.close
    form3 是一个全局的变量。和Tform3没什么关系的
      

  7.   

    直接调用方法close就可以了吧。
    再说Form3.close有吗?怎么调用出来的??
    基本的还是要知道的。
      

  8.   

    刚才自己打开Delphi 测试了一下
    Form3.close
    close
    self.close
    不都是一个意思吗?都能正常关闭的。
    应该是窗体重绘还没有完成就被释放了。不知道楼主的Button是不是自绘的。
      

  9.   

    或许LZ的TForm3不是自动创建的?所以全局变量form3没有被创建?
      

  10.   

    是线程未结束吗?PS:貌似我在Delphi版还没看到几个结贴给分的人……