2017-10-09 74 views
1

如何使这两个独立的窗口同时出现并在此后保持打开状态,除非按下退出按钮?制作2个窗口同时以红色语言出现

Red [] 

    view/flags [ below 
      text "second view" 
      f2: field "f2 text" 
      ] 'no-buttons 

    view/flags [ below 
     text "first view" 
     b1: button "Print f2 text" [print f2/text] 
     quitb: button "quit" [quit] 
    ] 'no-buttons 

我试图把第二视图中的函数,并从第一视图 - 调用它,但它仅示出了第二视图(第二被Alt-F4键关闭后的第一视图中示出)。

回答

4

view的调用是一个阻塞调用,它将运行自己的事件循环,直到它关闭。 view/no-wait将在没有新事件循环的情况下打开窗口,因此它不会阻塞(仍然需要事件循环来处理事件)。所以你可以打开第一个窗口作为非阻塞,并且最后一个处于阻塞模式,用于运行事件循环:

view/no-wait/flags [ 
    below 
    text "second view" 
    f2: field "f2 text" 
] 'no-buttons 

view/flags [ 
    below 
    text "first view" 
    b1: button "Print f2 text" [print f2/text] 
    quitb: button "quit" [quit] 
] 'no-buttons