gtktoggletoolbutton.inc 3.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778
  1. {$IFDEF read_forward_definitions}
  2. {$ENDIF read_forward_definitions}
  3. {$IFDEF read_interface_types}
  4. type
  5. PGtkToggleToolButtonPrivate = pointer;
  6. PGtkToggleToolButton = ^TGtkToggleToolButton;
  7. TGtkToggleToolButton = record
  8. parent : TGtkToolButton;
  9. priv : PGtkToggleToolButtonPrivate;
  10. end;
  11. { signal }
  12. { Padding for future expansion }
  13. PGtkToggleToolButtonClass = ^TGtkToggleToolButtonClass;
  14. TGtkToggleToolButtonClass = record
  15. parent_class : TGtkToolButtonClass;
  16. toggled : procedure (button:PGtkToggleToolButton);cdecl;
  17. _gtk_reserved1 : procedure ;
  18. _gtk_reserved2 : procedure ;
  19. _gtk_reserved3 : procedure ;
  20. _gtk_reserved4 : procedure ;
  21. end;
  22. {$ENDIF read_interface_types}
  23. {$IFDEF read_interface_rest}
  24. function GTK_TYPE_TOGGLE_TOOL_BUTTON : GType;
  25. function GTK_TOGGLE_TOOL_BUTTON(obj : pointer) : PGtkToggleToolButton;
  26. function GTK_TOGGLE_TOOL_BUTTON_CLASS(klass : pointer) : PGtkToggleToolButtonClass;
  27. function GTK_IS_TOGGLE_TOOL_BUTTON(obj : pointer) : gboolean;
  28. function GTK_IS_TOGGLE_TOOL_BUTTON_CLASS(klass : pointer) : gboolean;
  29. function GTK_TOGGLE_TOOL_BUTTON_GET_CLASS(obj : pointer) : PGtkToggleToolButtonClass;
  30. function gtk_toggle_tool_button_get_type:GType;cdecl;external gtklib name 'gtk_toggle_tool_button_get_type';
  31. function gtk_toggle_tool_button_new:PGtkToolItem;cdecl;external gtklib name 'gtk_toggle_tool_button_new';
  32. (* Const before type ignored *)
  33. function gtk_toggle_tool_button_new_from_stock(stock_id:Pgchar):PGtkToolItem;cdecl;external gtklib name 'gtk_toggle_tool_button_new_from_stock';
  34. procedure gtk_toggle_tool_button_set_active(button:PGtkToggleToolButton; is_active:gboolean);cdecl;external gtklib name 'gtk_toggle_tool_button_set_active';
  35. function gtk_toggle_tool_button_get_active(button:PGtkToggleToolButton):gboolean;cdecl;external gtklib name 'gtk_toggle_tool_button_get_active';
  36. {$endif read_interface_rest}
  37. {$ifdef read_implementation}
  38. function GTK_TYPE_TOGGLE_TOOL_BUTTON : GType;
  39. begin
  40. GTK_TYPE_TOGGLE_TOOL_BUTTON:=gtk_toggle_tool_button_get_type;
  41. end;
  42. function GTK_TOGGLE_TOOL_BUTTON(obj : pointer) : PGtkToggleToolButton;
  43. begin
  44. GTK_TOGGLE_TOOL_BUTTON:=PGtkToggleToolButton(G_TYPE_CHECK_INSTANCE_CAST(obj,GTK_TYPE_TOGGLE_TOOL_BUTTON));
  45. end;
  46. function GTK_TOGGLE_TOOL_BUTTON_CLASS(klass : pointer) : PGtkToggleToolButtonClass;
  47. begin
  48. GTK_TOGGLE_TOOL_BUTTON_CLASS:=PGtkToggleToolButtonClass(G_TYPE_CHECK_CLASS_CAST(klass,GTK_TYPE_TOGGLE_TOOL_BUTTON));
  49. end;
  50. function GTK_IS_TOGGLE_TOOL_BUTTON(obj : pointer) : gboolean;
  51. begin
  52. GTK_IS_TOGGLE_TOOL_BUTTON:=G_TYPE_CHECK_INSTANCE_TYPE(obj,GTK_TYPE_TOGGLE_TOOL_BUTTON);
  53. end;
  54. function GTK_IS_TOGGLE_TOOL_BUTTON_CLASS(klass : pointer) : gboolean;
  55. begin
  56. GTK_IS_TOGGLE_TOOL_BUTTON_CLASS:=G_TYPE_CHECK_CLASS_TYPE(klass,GTK_TYPE_TOGGLE_TOOL_BUTTON);
  57. end;
  58. function GTK_TOGGLE_TOOL_BUTTON_GET_CLASS(obj : pointer) : PGtkToggleToolButtonClass;
  59. begin
  60. GTK_TOGGLE_TOOL_BUTTON_GET_CLASS:=PGtkToggleToolButtonClass(G_TYPE_INSTANCE_GET_CLASS(obj,GTK_TYPE_TOGGLE_TOOL_BUTTON));
  61. end;
  62. {$endif read_implementation}