blob: fa5e37c6e2f673ec03f4aae1ef883b934ee9a309 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
|
// included by gtk2.pas
{$IFDEF read_forward_definitions}
{$ENDIF read_forward_definitions}
{$IFDEF read_interface_types}
type
PGtkActionPrivate = pointer;
PGtkAction = ^TGtkAction;
TGtkAction = record
_object : TGObject;
private_data : PGtkActionPrivate;
end;
{ activation signal }
{ widget creation routines (not signals) }
{ Padding for future expansion }
PGtkActionClass = ^TGtkActionClass;
TGtkActionClass = record
parent_class : TGObjectClass;
activate : procedure (action:PGtkAction);cdecl;
menu_item_type : GType;
toolbar_item_type : GType;
create_menu_item : function (action:PGtkAction):PGtkWidget;
create_tool_item : function (action:PGtkAction):PGtkWidget;
connect_proxy : procedure (action:PGtkAction; proxy:PGtkWidget);
disconnect_proxy : procedure (action:PGtkAction; proxy:PGtkWidget);
_gtk_reserved1 : procedure ;
_gtk_reserved2 : procedure ;
_gtk_reserved3 : procedure ;
_gtk_reserved4 : procedure ;
end;
{$ENDIF read_interface_types}
{$IFDEF read_interface_rest}
function GTK_TYPE_ACTION : GType;
function GTK_ACTION(obj : pointer) : PGtkAction;
function GTK_ACTION_CLASS(klass : pointer) : PGtkActionClass;
function GTK_IS_ACTION(obj : pointer) : gboolean;
function GTK_IS_ACTION_CLASS(klass : pointer) : gboolean;
function GTK_ACTION_GET_CLASS(obj : pointer) : PGtkActionClass;
function gtk_action_get_type:GType;cdecl;external gtklib name 'gtk_action_get_type';
function gtk_action_new(name:Pgchar; szLabel:Pgchar; tooltip:Pgchar; stock_id:Pgchar):PGtkAction;cdecl;external gtklib name 'gtk_action_new';
function gtk_action_get_name(action:PGtkAction):Pgchar;cdecl;external gtklib name 'gtk_action_get_name';
function gtk_action_is_sensitive(action:PGtkAction):gboolean;cdecl;external gtklib name 'gtk_action_is_sensitive';
function gtk_action_get_sensitive(action:PGtkAction):gboolean;cdecl;external gtklib name 'gtk_action_get_sensitive';
function gtk_action_is_visible(action:PGtkAction):gboolean;cdecl;external gtklib name 'gtk_action_is_visible';
function gtk_action_get_visible(action:PGtkAction):gboolean;cdecl;external gtklib name 'gtk_action_get_visible';
procedure gtk_action_activate(action:PGtkAction);cdecl;external gtklib name 'gtk_action_activate';
function gtk_action_create_icon(action:PGtkAction; icon_size:TGtkIconSize):PGtkWidget;cdecl;external gtklib name 'gtk_action_create_icon';
function gtk_action_create_menu_item(action:PGtkAction):PGtkWidget;cdecl;external gtklib name 'gtk_action_create_menu_item';
function gtk_action_create_tool_item(action:PGtkAction):PGtkWidget;cdecl;external gtklib name 'gtk_action_create_tool_item';
procedure gtk_action_connect_proxy(action:PGtkAction; proxy:PGtkWidget);cdecl;external gtklib name 'gtk_action_connect_proxy';
procedure gtk_action_disconnect_proxy(action:PGtkAction; proxy:PGtkWidget);cdecl;external gtklib name 'gtk_action_disconnect_proxy';
function gtk_action_get_proxies(action:PGtkAction):PGSList;cdecl;external gtklib name 'gtk_action_get_proxies';
procedure gtk_action_connect_accelerator(action:PGtkAction);cdecl;external gtklib name 'gtk_action_connect_accelerator';
procedure gtk_action_disconnect_accelerator(action:PGtkAction);cdecl;external gtklib name 'gtk_action_disconnect_accelerator';
{ protected ... for use by child actions }
procedure gtk_action_block_activate_from(action:PGtkAction; proxy:PGtkWidget);cdecl;external gtklib name 'gtk_action_block_activate_from';
procedure gtk_action_unblock_activate_from(action:PGtkAction; proxy:PGtkWidget);cdecl;external gtklib name 'gtk_action_unblock_activate_from';
procedure _gtk_action_emit_activate(action:PGtkAction);cdecl;external gtklib name '_gtk_action_emit_activate';
{ protected ... for use by action groups }
procedure gtk_action_set_accel_path(action:PGtkAction; accel_path:Pgchar);cdecl;external gtklib name 'gtk_action_set_accel_path';
procedure gtk_action_set_accel_group(action:PGtkAction; accel_group:PGtkAccelGroup);cdecl;external gtklib name 'gtk_action_set_accel_group';
{$endif read_interface_rest}
{$ifdef read_implementation}
function GTK_TYPE_ACTION : GType;
begin
GTK_TYPE_ACTION:=gtk_action_get_type;
end;
function GTK_ACTION(obj : pointer) : PGtkAction;
begin
GTK_ACTION:=PGtkAction(G_TYPE_CHECK_INSTANCE_CAST(obj,GTK_TYPE_ACTION));
end;
function GTK_ACTION_CLASS(klass : pointer) : PGtkActionClass;
begin
GTK_ACTION_CLASS:=G_TYPE_CHECK_CLASS_CAST(klass,GTK_TYPE_ACTION);
end;
function GTK_IS_ACTION(obj : pointer) : gboolean;
begin
GTK_IS_ACTION:=G_TYPE_CHECK_INSTANCE_TYPE(obj,GTK_TYPE_ACTION);
end;
function GTK_IS_ACTION_CLASS(klass : pointer) : gboolean;
begin
GTK_IS_ACTION_CLASS:=G_TYPE_CHECK_CLASS_TYPE(klass,GTK_TYPE_ACTION);
end;
function GTK_ACTION_GET_CLASS(obj : pointer) : PGtkActionClass;
begin
GTK_ACTION_GET_CLASS:=PGtkActionClass(G_TYPE_INSTANCE_GET_CLASS(obj,GTK_TYPE_ACTION));
end;
{$endif read_implementation}
|
