每天都很晕

Question

刚才不知道怎么弄的,,,也不知道怎么设的,,,现在项目运行时,原来的程序窗口都是好使的,就是我新加的几个程序窗口现在不能关闭了,,现在标题栏的那个关闭键,它就自动缩小到屏幕的左下角,和按最小化的功能是一样的,,,就是不能关闭,怎么回事啊,大家帮分析分析吧,

Answer 1

你是在开发MID程序吧，在窗口的onclose事件中添加如下代码即可：
action:=cafree;

Answer 2

什么是MID程序啊,我不知道,惭愧,,
原来是好使的,而且程序中是有这些代码的
procedure  TDigitEnterpriseTypeForm.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin  dxDBGrid1.DataSource.DataSet.Close;
  Action:=caFree;
end;end.

Answer 3

乱说什么呀，你的是MD程序，直接在窗口关闭事件中加入action:=cafree;即可