Ugh! I am having trouble visualizing sizers.
- Posted by vmars Jul 04, 2009
- 1211 views
Ugh! I am having trouble visualizing sizers. Here's what I want to see:
vertically: 4 rows
row1: panel(top) , then Hsizer , then topbutton01 + (horizontally) topbutton02
row2: wxScrolledWindow , then Vsizer , then 6-rows by 8-cols of 8buttons
row3: panel(mid) , then Hsizer , then midbutton01 + (horizontally) midbutton02
row4: wsRichTextCtrl
I can't figure out what I am doing wrong. -Thanks! ...V
[include statements] include wxeud.e without warning
[constants] constant Red = create( wxColour, {#FF,#00,#00} )
[create the controls] constant main = create( wxFrame, {0, -1, "TXTool", -1, -1, 400, 500} ), panl = create( wxPanel, main ), panltop = create( wxPanel, panl ), topbutton01 = create( wxButton, {panltop, new_id(), "Push Me", -1, -1, 40, 60} ), topbutton02 = create( wxButton, {panltop, new_id(), "Push Me", -1, -1, 40, 60} ), scrollwin = create( wxScrolledWindow, {panl, new_id(), -1, -1, -1, -1, 0} ), panlmid = create( wxPanel, panl ), midbutton01 = create( wxButton, {panlmid, new_id(), "Push Me", -1, -1, 40, 60} ), midbutton02 = create( wxButton, {panlmid, new_id(), "Push Me", -1, -1, 40, 60} ), txted = create( wxRichTextCtrl, {panl, -1, "Enter Text Here", -1, -1, 399, 250} ), panlbox = create( wxBoxSizer, {wxVERTICAL} ), panlboxt = create( wxBoxSizer, {wxHORIZONTAL} ), panlboxm = create( wxBoxSizer, {wxHORIZONTAL} ), scrollbox = create( wxBoxSizer, {wxVERTICAL} ), button_grid = create( wxFlexGridSizer, { 6, 8, 5, 5 })
[event handlers and other code] add_window_to_sizer( panlboxt, topbutton01, 0, wxGROW, 0 ) add_window_to_sizer( panlboxt, topbutton02, 0, wxGROW, 0 ) add_window_to_sizer( panlbox, scrollwin, 1, wxGROW, 0 ) add_window_to_sizer( panlboxm, midbutton01, 0, wxGROW, 0 ) add_window_to_sizer( panlboxm, midbutton02, 0, wxGROW, 0 ) add_window_to_sizer( panlbox, txted, 0, wxGROW, 0 )
add_sizer_to_sizer( scrollbox, button_grid, 1, wxGROW, 0 ) add_sizer_to_sizer( panlbox, panlboxt, 1, wxGROW, 0 ) add_sizer_to_sizer( panlbox, panlboxm, 1, wxGROW, 0 )
http://wxeuphoria.sourceforge.net/sfdocs/CONTROL.html#SET_SIZE
set_scrollbars( scrollwin, 20, 20, 50, 50, 0, 0, 0 ) set_back_color( scrollwin, Red )
atom tempbtn for i = 1 to 6 do for j = 1 to 8 do tempbtn = create( wxButton, {scrollwin, -1, sprintf("Button %dx%d", i & j), 0, 0, 90, 60} ) add_window_to_sizer( button_grid, tempbtn, 1, wxGROW, 0 ) end for j end for i
set_sizer( panl, panlbox ) set_sizer( panltop, panlboxt ) set_sizer( panlmid, panlboxm ) set_sizer( scrollwin, scrollbox )
wxMain( main ) with help from: Geg, Matt
