!7

cmodule UploadFile {
  S filePath, result;
  
  visual
    vstackWithSpacing(
      dm_filePathInput filePath(),
      jbutton("Upload", rThread upload),
      dm_fieldLabel result());
    
  void upload enter {
    try {
      setField(result := uploadFileToFileServer(filePath));
    } catch print e {
      setField(result := exceptionToStringShort(e));
    }
  }
}