Message-ID: <1144515316.4437eaf44f7a2 at www.recherche.enac.fr>
Date: Sat, 08 Apr 2006 18:55:16 +0200
From: brisset at recherche.enac.fr
To: lablgtk at math.nagoya-u.ac.jp
Subject: Label in menu entry
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
Content-Type: text/plain; charset=ISO-8859-1
Content-Length: 675

Hi,
I'm trying to put a "complex" widget in a image menu item, i.e. a box
with several children. If I put a label in the box, the label is crossed
out by an horizontal line.
Any help ?

Thanks

--Pascal

let _ =
  let w = GWindow.window ~width:200 () in
  let vbox= GPack.vbox ~packing: w#add () in
  let menubar = GMenu.menu_bar ~packing:vbox#add () in
  let h = GPack.hbox () in
  let l = GMisc.label ~text:"Label" ~packing:h#add () in
  let ii = GMenu.image_menu_item ~image:h ~packing:menubar#add ()  in
  w#show ();
  GMain.Main.main ()


----------------------------------------------------------------
This message was sent using IMP, the Internet Messaging Program.