plugins/Actman/global.pas


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

unit global;

interface

type
  tAddOption = function(var tmpl:pAnsiChar;var proc:pointer;var name:PAnsiChar):integer;
type
  pActionLink=^tActionLink;
  tActionLink=record
    Next     :pActionLink;
    Init     :procedure;
    DeInit   :procedure;
    AddOption:tAddOption;
  end;

const
  ActionLink:pActionLink=nil;

implementation

end.