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 PGtkVPaned = ^TGtkVPaned; 10 TGtkVPaned = record 11 paned : TGtkPaned; 12 end; 13 14 PGtkVPanedClass = ^TGtkVPanedClass; 15 TGtkVPanedClass = record 16 parent_class : TGtkPanedClass; 17 end; 18 19{$ENDIF read_interface_types} 20 21//------------------------------------------------------------------------------ 22 23{$IFDEF read_interface_rest} 24function GTK_TYPE_VPANED : GType; 25function GTK_VPANED(obj: pointer) : PGtkVPaned; 26function GTK_VPANED_CLASS(klass: pointer) : PGtkVPanedClass; 27function GTK_IS_VPANED(obj: pointer) : boolean; 28function GTK_IS_VPANED_CLASS(klass: pointer) : boolean; 29function GTK_VPANED_GET_CLASS(obj: pointer) : PGtkVPanedClass; 30 31 32function gtk_vpaned_get_type:TGtkType; cdecl; external gtklib; 33function gtk_vpaned_new:PGtkWidget; cdecl; external gtklib; 34{$ENDIF read_interface_rest} 35 36//------------------------------------------------------------------------------ 37 38{$IFDEF read_implementation} 39function GTK_TYPE_VPANED : GType; 40begin 41 GTK_TYPE_VPANED:=gtk_vpaned_get_type; 42end; 43 44function GTK_VPANED(obj: pointer) : PGtkVPaned; 45begin 46 GTK_VPANED:=PGtkVPaned(GTK_CHECK_CAST(obj,GTK_TYPE_VPANED)); 47end; 48 49function GTK_VPANED_CLASS(klass: pointer) : PGtkVPanedClass; 50begin 51 GTK_VPANED_CLASS:=PGtkVPanedClass(GTK_CHECK_CLASS_CAST(klass,GTK_TYPE_VPANED)); 52end; 53 54function GTK_IS_VPANED(obj: pointer) : boolean; 55begin 56 GTK_IS_VPANED:=GTK_CHECK_TYPE(obj,GTK_TYPE_VPANED); 57end; 58 59function GTK_IS_VPANED_CLASS(klass: pointer) : boolean; 60begin 61 GTK_IS_VPANED_CLASS:=GTK_CHECK_CLASS_TYPE(klass,GTK_TYPE_VPANED); 62end; 63 64function GTK_VPANED_GET_CLASS(obj: pointer) : PGtkVPanedClass; 65begin 66 GTK_VPANED_GET_CLASS:=PGtkVPanedClass(GTK_CHECK_GET_CLASS(obj,GTK_TYPE_VPANED)); 67end; 68 69{$ENDIF read_implementation} 70// included by gtk2.pas 71 72