!7 sclass LastImagesInDirectory extends DynModule { /*virtual DirectoryInfo*/O dirInfo; S dir; L imageNames; transient DynamicHStack stack; File dirObject() { ret newFile(dir); } void start { ownTimer(doEvery(10.0, r fullUpdate)); } JComponent visualize() { if (dir == null) ret jcenteredbutton("Select directory...", r { selectFile("Select directory to show", voidfunc(File dir) { setField(dir := f2s(dir)); findMate(); revisualize(); }); }); ret jHigherScrollPane(jfullcenter(stack = makeNiceButtons()); } void update { lock lock; // TODO addToNiceButtons(buttons, s, #1101240, null); trimHStackFromLeft(buttons, 5); centerPackFrame(buttons); scrollAllTheWayToTheRight(buttons); } }