From: Eric M. <ee...@uk...> - 2010-01-08 07:53:11
|
Dear all, I have written the following program: *** main :: IO() main = do initGUI menuBar <- menuBarNew file_menu <- menuNew file_item <- menuItemNewWithMnemonic "_File" menuItemSetSubmenu file_item file_menu menuShellAppend menuBar file_item pages <- notebookNew scroller <- scrolledWindowNew Nothing Nothing containerAdd scroller table notebookAppendPage pages scroller "Page 0" vBox <- vBoxNew True 0 boxPackStart vBox menuBar PackNatural 0 boxPackStart vBox pages PackGrow 0 w <- windowNew onDestroy w mainQuit set w [containerChild := vBox] widgetShowAll w windowMaximize w mainGUI *** Unfortunately, when I run the program, the menu bar and notebook are not positioned desirably. How can I improve the layout? |
From: Axel S. <Axe...@en...> - 2010-01-08 15:42:57
|
Hi Eric, On Jan 8, 2010, at 8:35, Eric Macaulay wrote: > *** > > Unfortunately, when I run the program, the menu bar and notebook are > not positioned desirably. How can I improve the layout? You program lacks a definition for table. What layout do you see and what do you expect? Cheers, Axel. |