begin external class windowtools; inspect new mainwindow("Main") do begin ref(button) quit; ref(ItemList) IL; ref(TextItemWindow) nom; setsize(500, 500); IL :- MakeItemList; nom :- IL.maketextitem("Nom", 8); show; quit :- makebutton("ok"); quit.wait; end; end;