!7

sclass ImagesInDirectory extends DynSCP {
  File dir;

  transient DynamicHStack buttons;
  transient ButtonImageLoader imageLoader;

  JComponent visualize2() {
    if (dir == null)
      ret jcenteredbutton("Select directory...", rThread select);
    else {
      setDir(dir);
      ret getComponent();
    }
  }
  
  void select {
    temp enter();
    selectDir(voidfunc(File dir) { setDir(dir) });
  }
  
  void setDir(File dir) {
    temp enter();
    setField(+dir);

    buttons = makeNiceButtons();
    imageLoader = new ButtonImageLoader(buttons);
    setComponent(jHigherScrollPane(jfullcenter(buttons)));
  }
  
  void updateButtons {
    if (dir == null || buttons == null) ret;
    L<File> imageFiles = listImageFiles(dir);
    L<TextImageAction> l = filesForNiceButtons(sortFilesByDate(
      filesForNiceButtons), f showImage);
    for (final TextImageAction tia : l)
      tia.popupMenuMaker = ImagesInDirectory_popupMenu(this, tia);
    replaceNiceButtons(buttons, l);
    setModuleName(
      n2(l, "image") + " in directory " + fileName(dir));
    if (imageLoader != null) imageLoader.update();
  }
}

static VF1<JPopupMenu> ImagesInDirectory_popupMenu(ImagesInDirectory m, final TextImageAction tia) {
  ret voidfunc(JPopupMenu menu) {
    addPopupItemsForImageFile(menu, filesForNiceButtons_map.get(tia))
  };
}