gtkhscrollbar.inc 2.1 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071
  1. // included by gtk2.pas
  2. {$IFDEF read_forward_definitions}
  3. {$ENDIF read_forward_definitions}
  4. //------------------------------------------------------------------------------
  5. {$IFDEF read_interface_types}
  6. PGtkHScrollbar = ^TGtkHScrollbar;
  7. TGtkHScrollbar = record
  8. scrollbar : TGtkScrollbar;
  9. end;
  10. PGtkHScrollbarClass = ^TGtkHScrollbarClass;
  11. TGtkHScrollbarClass = record
  12. parent_class : TGtkScrollbarClass;
  13. end;
  14. {$ENDIF read_interface_types}
  15. //------------------------------------------------------------------------------
  16. {$IFDEF read_interface_rest}
  17. function GTK_TYPE_HSCROLLBAR : GType;
  18. function GTK_HSCROLLBAR(obj: pointer) : PGtkHScrollbar;
  19. function GTK_HSCROLLBAR_CLASS(klass: pointer) : PGtkHScrollbarClass;
  20. function GTK_IS_HSCROLLBAR(obj: pointer) : boolean;
  21. function GTK_IS_HSCROLLBAR_CLASS(klass: pointer) : boolean;
  22. function GTK_HSCROLLBAR_GET_CLASS(obj: pointer) : PGtkHScrollbarClass;
  23. function gtk_hscrollbar_get_type:TGtkType; cdecl; external gtklib;
  24. function gtk_hscrollbar_new(adjustment:PGtkAdjustment):PGtkWidget; cdecl; external gtklib;
  25. {$ENDIF read_interface_rest}
  26. //------------------------------------------------------------------------------
  27. {$IFDEF read_implementation}
  28. function GTK_TYPE_HSCROLLBAR : GType;
  29. begin
  30. GTK_TYPE_HSCROLLBAR:=gtk_hscrollbar_get_type;
  31. end;
  32. function GTK_HSCROLLBAR(obj: pointer) : PGtkHScrollbar;
  33. begin
  34. GTK_HSCROLLBAR:=PGtkHScrollbar(GTK_CHECK_CAST(obj,GTK_TYPE_HSCROLLBAR));
  35. end;
  36. function GTK_HSCROLLBAR_CLASS(klass: pointer) : PGtkHScrollbarClass;
  37. begin
  38. GTK_HSCROLLBAR_CLASS:=PGtkHScrollbarClass(GTK_CHECK_CLASS_CAST(klass,GTK_TYPE_HSCROLLBAR));
  39. end;
  40. function GTK_IS_HSCROLLBAR(obj: pointer) : boolean;
  41. begin
  42. GTK_IS_HSCROLLBAR:=GTK_CHECK_TYPE(obj,GTK_TYPE_HSCROLLBAR);
  43. end;
  44. function GTK_IS_HSCROLLBAR_CLASS(klass: pointer) : boolean;
  45. begin
  46. GTK_IS_HSCROLLBAR_CLASS:=GTK_CHECK_CLASS_TYPE(klass,GTK_TYPE_HSCROLLBAR);
  47. end;
  48. function GTK_HSCROLLBAR_GET_CLASS(obj: pointer) : PGtkHScrollbarClass;
  49. begin
  50. GTK_HSCROLLBAR_GET_CLASS:=PGtkHScrollbarClass(GTK_CHECK_GET_CLASS(obj,GTK_TYPE_HSCROLLBAR));
  51. end;
  52. {$ENDIF read_implementation}
  53. // included by gtk2.pas