本文整理自网络,侵删。
Application.Restore不起作用了窗体上只有一个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.Restoreend;
单击Button后窗口最小化了,可是不能在1秒后自动还原。
运行环境:Delphi 2010 、Windows 7
------解决方案--------------------设置为False后就可以了Application.MainFormOnTaskbar := False; // 加入截图程序 这句放到非form1 窗口
相关阅读 >>
Delphi pchar和array [0..255] of char的区别
更多相关阅读请进入《Delphi》频道 >>