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