!include once #1013490 // sarxos webcam

static void selectWebCam(final VF1<Webcam> onSelect) {
  fL<Webcam> webcams = new L(Webcam.getWebcams());
  if (l(webcams) == 1) { awt { callF(onSelect, first(webcams); } ret; }
  LS camNames = mapMethod getName(webcams);
  addToLocalMechList_uniq("All Web Cam Names", camNames);
  final JComboBox cbCams = jcombobox(camNames);
  renameSubmitButton(showTitledForm("Select WebCam",
    "Camera:", cbCams, r { awt {
      callF(onSelect, webcams.get(getSelectedIndex(cbCams)));
    }}), "Select camera");
}