!7

module GrabScreenshot > DynImageSurface {
  S computerID;
  int width = 256;
  
  visualize {
    ret northAndCenterWithMargins(vstackWithSpacing(
      centerAndEastWithMargin(
        withLabel("Grab from:", dm_onlineComputerSelectorComboBox(dm_fieldLiveValue('computerID))),
        jbutton("Grab", rThread grab)),
        withLabel("Resize to width (pixels):", jLiveValueIntTextField(dm_fieldLiveValue('width)))),
      super.visualize());
  }
  
  void grab enter {
    if (possibleComputerID(computerID)) loading "Grabbing Screenshot..." {
      setImage(dm_scaledDownScreenshotFromOtherMachine(computerID, width));
    }
  }
}