srecord noeq JTextFileEditor(File file) is Swingable {
  settable bool autoSave;
  settable bool wordWrap = true;
  gettable bool uneditable;
  
  gettable JTextArea textArea;
  JButton btnReload, btnSave;
  JLabel lblChanged;
  volatile S fileContents, savedText;
  FileWatchService fileWatcher;
  Q q = startQ();
  RSTOverQ rstLoad = rstWithPreDelay(0.5, q, r _load);
  RSTOverQ rstSave;
  JPanel buttons;
  SingleComponentPanel scpButtons = singleComponentPanel();

  cachedVisualize {
    assertNotNull(file);
    rstSave = rstWithPreDelay(autoSave ? 0.5 : 0.0, q, r _save);
    savedText = fileContents = loadTextFile(file);
    textArea = makeTextArea();
    if (uneditable) makeUneditable(textArea);
    if (wordWrap) enableWordWrapForTextArea(textArea);
    setText(savedText);
    onChange(textArea, -> {
      updateButtons();
      if (autoSave) rstSave!;
    });
    
    // Ctrl+S to save text
    addKeyListener(textArea(), ctrlLetterKeyListener('s', rstSave));
    
    bindToComponent(textArea, -> {
      fileWatcher = new FileWatchService;
      fileWatcher.addNonRecursiveListener(dirOfFile(file),
        f -> { if (sameFile(f, file)) rstLoad!; });
      rstLoad!;
    }, -> { dispose fileWatcher; });
    
    scpButtons.set(buttons = makeButtons());
    
    ret northAndCenter(
      withSideMargin(10, 20, centerAndEastWithMargin(
        new JFilePathLabel(file).iconOnTheLeft(true).minWidth(true).visualize(),
        scpButtons)),
      withMargin(textAreaLayoutComponent())
    );
  }
  
  JPanel makeButtons() {
    btnSave = btnReload = null;
    ret jline(
      uneditable ? null
        : autoSave
          ? (lblChanged = jlabel())
          : (btnSave = disableButton(jbutton("Save", rstSave))),
      uneditable ? null : (btnReload = jbutton("Reload", r reload))
    );
  }
  
  swappable JComponent textAreaLayoutComponent() { ret jscroll(textArea()); }
  
  void updateButtons {
    bool changed = !eq(savedText, getText(textArea));
    setEnabled(btnSave, changed);
    setEnabled(btnReload, !eq(fileContents, savedText));
    main setText(lblChanged, changed ? "*" : "");
  }
  
  void _save {
    if (!uneditable)
      saveTextFileVerbose(file, savedText = getText(textArea));
  }
  
  void reload {
    savedText = fileContents;
    setText(savedText);
    updateButtons();
  }
  
  void _load {
    print("Loading " + file);
    fileContents = loadTextFile(file);
    updateButtons();
    if (uneditable) reload();
  }
  
  swappable JTextArea makeTextArea() {
    ret jTypeWriterTextArea();
  }
  
  void setText(S text) {
    main setText(textArea(), text);
  }
  
  JPanel buttons() {
    visualize();
    ret buttons;
  }
  
  selfType uneditable(bool b) {
    if (uneditable == b) this;
    uneditable = b;
    if (buttons != null) {
      scpButtons.set(buttons = makeButtons());
      setEditable(textArea(), true);
    }
    this;
  }
}