вроде разобрался работает так:
Код:
private
{ Private declarations }
procedure IdleEventHandler(Sender: TObject; var Done: Boolean);
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.IdleEventHandler(Sender: TObject; var Done: Boolean);
begin
if timer1.Interval=10000 then
Form1.WindowState:=wsMaximized;
Done := false;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnIdle := IdleEventHandler;
form1.WindowState:=wsMinimized;
end;
скажите пожалуйста как сделать чтобы по истечении 5 мин бездействия запускалась форма?