我的 google-fu 让我失望了。如何删除已添加到的小部件Panel ()
?例如,在下面,我希望controls
-panel 再次变为空。
buildGUI = do
f <- frame [ text := "Hello" ]
controls <- panel f []
ctext <- staticText controls [ text := "Foo" ]
set controls [ layout := margin 5 (widget ctext) ]
set f [ layout := widget controls ]
{- delete ctext ? How? -}
return ()
(我正在尝试构建一个动态 GUI,当它更新时我需要摆脱旧控件)。