读书人

Application.Restore不起作用了,该怎么

发布时间: 2013-01-01 14:04:19 作者: rapoo

Application.Restore不起作用了
本帖最后由 NTSCPAL 于 2012-08-26 13:35:19 编辑 窗体上只有一个Button和一个Timer(1秒计时)
代码如下:


procedure TForm1.Button1Click(Sender: TObject);
begin
Application.Minimize;
Timer1.Enabled := True;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.Enabled := False;
Application.Restore
end;


单击Button后窗口最小化了,可是不能在1秒后自动还原。

运行环境:Delphi 2010 、Windows 7
[解决办法]
设置为False后就可以了
Application.MainFormOnTaskbar := False;

读书人网 >.NET

热点推荐