!7

cmodule AIAlbum > DynSCP {

  transient File dir;

  transient DynamicHStack buttons;

  transient ButtonImageLoader imageLoader;

  start {

    dir = aiImageAlbumDir();

    ownResource(vmBus_onDirChange(dir, r updateButtons));

  }

  JComponent visualize2() {

    setDir(dir);

    ret getComponent();

  }

  void setDir(File dir) {

    temp enter();

    setField(+dir);

    buttons = makeNiceButtons();

    imageLoader = new ButtonImageLoader(buttons) {

      void setAButtonsImage(JButton b, File f) {

        BufferedImage img = loadBufferedImage(f);

        BufferedImage preview = scaleBufferedImageToHeight(imageHeight, img);

        setButtonImage(b, preview);

      }

    };

    updateButtons();

    setComponent(jHigherScrollPane(jfullcenter(buttons)));

  }

  void updateButtons {

    if (dir == null || buttons == null) ret;

    temp enter();

    L<File> imageFiles = latestFilesFirst(listImageFiles(dir));

    L<TextImageAction> l = filesForNiceButtons(latestFilesFirst(imageFiles), f showImage);

    for (final TextImageAction tia : l)

      tia.popupMenuMaker = imageFilesPopupMenuFunction(tia);

    replaceNiceButtons(buttons, l);

    setModuleName("AI Album (" + l(l) + ")");

    if (imageLoader != null) imageLoader.update();

  }

}