All non-working stuff moved from trunk

git-svn-id: http://svn.miranda-ng.org/main/trunk@13071 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 0 insertions, 73 deletions

diff --git a/plugins/!Deprecated/Actman20/hooks/hooks.pas b/plugins/!Deprecated/Actman20/hooks/hooks.pas
deleted file mode 100644
index b3309c327a..0000000000
--- a/plugins/!Deprecated/Actman20/hooks/hooks.pas
+++ /dev/null
@@ -1,73 +0,0 @@
-unit hooks;

-

-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,

-  global, mApiCardM;

-

-{$R hooks.res}

-

-{$include m_actman.inc}

-

-{$include i_hook.inc}

-{$include i_hconst.inc}

-{$include i_options.inc}

-{$include i_opt_dlg.inc}

-

-// ------------ base interface functions -------------

-

-procedure Init;

-begin

-

-  MessageWindow:=CreateWindowExW(0,'STATIC',nil,0,1,1,1,1,HWND_MESSAGE,0,hInstance,nil);

-  if MessageWindow<>0 then

-    SetWindowLongPtrW(MessageWindow,GWL_WNDPROC,LONG_PTR(@HookWndProc));

-

-  if LoadHooks=0 then

-  begin

-    MaxHooks:=8;

-    GetMem  (HookList ,MaxHooks*SizeOf(tHookRec));

-    FillChar(HookList^,MaxHooks*SizeOf(tHookRec),0);

-  end

-  else

-    SetAllHooks;

-end;

-

-procedure DeInit;

-begin

-  ClearHooks;

-  if MessageWindow<>0 then

-    DestroyWindow(MessageWindow);

-end;

-

-function AddOptionPage(var tmpl:pAnsiChar;var proc:pointer;var name:PAnsiChar):integer;

-begin

-  result:=0;

-  tmpl:=PAnsiChar(IDD_HOOKS);

-  proc:=@DlgProcOpt;

-  name:='Hooks';

-end;

-

-var

-  amLink:tActionLink;

-

-procedure InitLink;

-begin

-  amLink.Next     :=ActionLink;

-  amLink.Init     :=@Init;

-  amLink.DeInit   :=@DeInit;

-  amLink.AddOption:=@AddOptionPage;

-  ActionLink      :=@amLink;

-end;

-

-initialization

-  InitLink;

-end.