!7

sclass DynSCP extends DynModule {
}

sclass LastImagesInDirectory extends DynModule {
  /*DirectoryInfo*/O mate;
  S dir;
  L<S> imageNames;
  
  transient DynamicHStack stack;

  File dirObject() { ret newFile(dir); }
  
  void start { ownTimer(doEvery(10.0, r fullUpdate)); }
  
  JComponent visualize() {
    ret jHigherScrollPane(jfullcenter(stack = makeNiceButtons());
  }
  
  void update {
    lock lock;
    if (mate == null)
      mate = dm_findMateOfType(this, 'DirectoryInfo);

           addToNiceButtons(buttons, s, #1101240, null);
    trimHStackFromLeft(buttons, 5);
    centerPackFrame(buttons);
    scrollAllTheWayToTheRight(buttons);

  }
  
  
}