/src/wrappers/gtk/library/gtk_vbox.e
Specman e | 49 lines | 37 code | 7 blank | 5 comment | 2 complexity | dab32a50589b40b48e52960c8cd963cd MD5 | raw file
1indexing 2 description: "GtkVBox -- A vertical container box." 3 copyright: "[ 4 Copyright (C) 2006 eiffel-libraries team, GTK+ team 5 6 This library is free software; you can redistribute it and/or 7 modify it under the terms of the GNU Lesser General Public License 8 as published by the Free Software Foundation; either version 2.1 of 9 the License, or (at your option) any later version. 10 11 This library is distributed in the hope that it will be useful, but 12 WITHOUT ANY WARRANTY; without even the implied warranty of 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 14 Lesser General Public License for more details. 15 16 You should have received a copy of the GNU Lesser General Public 17 License along with this library; if not, write to the Free Software 18 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 19 02110-1301 USA 20 ]" 21 date: "$Date:$" 22 revision: "$Revision:$" 23 24class GTK_VBOX 25inherit 26 GTK_BOX 27 -- GtkHBox implements AtkImplementorIface. 28insert 29 GTK_VBOX_EXTERNALS 30 31creation make, from_external_pointer 32 33feature {} -- Creation 34 make (an_homogeneous: BOOLEAN; a_spacing: INTEGER) is 35 -- Creates a new GtkVBox. If `an_homogeneous' is True all 36 -- children are to be given equal space 37 -- allotments. `a_spacing' is the number of pixels to place 38 -- by default between children. 39 require gtk_initialized: gtk.is_initialized 40 do 41 from_external_pointer (gtk_vbox_new (an_homogeneous.to_integer, a_spacing)) 42 end 43 44feature -- struct size 45 struct_size: INTEGER is 46 external "C inline use <gtk/gtk.h>" 47 alias "sizeof(GtkVBox)" 48 end 49end