OpenEuphoria

puzzle 2

• Posted by gwalters at sc.rr.com Mar 15, 2002
• 398 views

Thanks, for the suggestion for the 'fake title bar'. I'll try that. I guess
that if there is a caption you can drag the window.

The text with wPuts does not show up in the window, but the buttons do. (I
solved puzzle 1). Can you see why the text does not show up? If I print it
to a dos widow (just puts not wPuts) the text is there.

    for j = 2 to len(EUmenu[i]) do
     if match(EUmenu[i][j][2],"*") then
      setFont(id,"Courier New",10,Bold)
      setPosition(id,col,row)
      wPuts(id,EUmenu[i][j][1])
     else
      setFont(id,"Courier New",10,Normal)
      id = create(Button,EUmenu[i][j][1],subMenuId[i],
        col,row,lenRow,25,#8000) --BS_FLAT
     end if
     row += 25
    end for


george