From f2cce78db24a0f0a53b8ca41ff112968a5f2d86b Mon Sep 17 00:00:00 2001 From: Vadim Dashevskiy Date: Fri, 19 Dec 2014 20:02:47 +0000 Subject: Actman 2.0 is moved to deprecated, Actman 3.0 is a new default Actman (with database settings converter from older version) git-svn-id: http://svn.miranda-ng.org/main/trunk@11533 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c --- plugins/Actman/tasks/scheduler.pas | 24 ++++++------------------ 1 file changed, 6 insertions(+), 18 deletions(-) (limited to 'plugins/Actman/tasks/scheduler.pas') diff --git a/plugins/Actman/tasks/scheduler.pas b/plugins/Actman/tasks/scheduler.pas index 05e9cb6a58..1ec1202f26 100644 --- a/plugins/Actman/tasks/scheduler.pas +++ b/plugins/Actman/tasks/scheduler.pas @@ -2,21 +2,15 @@ unit scheduler; interface -procedure Init; -procedure DeInit; -function AddOptionPage(var tmpl:pAnsiChar;var proc:pointer;var name:PAnsiChar):integer; - implementation uses windows, commctrl, messages, - mirutils, common, dbsettings, io, m_api, wrapper, + mirutils, common, dbsettings, m_api, wrapper, global; {$R tasks.res} -{$include m_actman.inc} - var hevent: THANDLE; @@ -28,11 +22,6 @@ var // ------------ base interface functions ------------- -var - hendis, - hcount, - hdel: THANDLE; - procedure Init; begin @@ -45,19 +34,18 @@ begin else SetAllTasks; - hcount:=CreateServiceFunction(MS_ACT_TASKCOUNT ,@TaskCount); - hendis:=CreateServiceFunction(MS_ACT_TASKENABLE,@TaskEnable); - hdel :=CreateServiceFunction(MS_ACT_TASKDELETE,@TaskDelete); + CreateServiceFunction(MS_ACT_TASKCOUNT ,@TaskCount); + CreateServiceFunction(MS_ACT_TASKENABLE,@TaskEnable); + CreateServiceFunction(MS_ACT_TASKDELETE,@TaskDelete); + hevent:=CreateHookableEvent(ME_ACT_BELL); end; procedure DeInit; begin + DestroyHookableEvent(hevent); StopAllTasks; - DestroyServiceFunction(hendis); - DestroyServiceFunction(hdel); - DestroyServiceFunction(hcount); ClearTasks; end; -- cgit v1.2.3