123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115 |
- // 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}
|