!7

concept ItemPage {
  S globalID = aGlobalID();
  S title, imageID;
  long created = now(), occurred;
  L<S> paragraphs = listInConcept(this);
}

static JTextPane textPane;

p-subst {
  setConsoleInputFontSize(20);
  centerConsoleInput();
  centerBottomConsole();
  db();
  bot("Show Item Page.");
  focusConsole();
}

static bool showItemPage(S _word) {
  final new ItemPage p;
  fS word = trim(_word);
  fS text = word + "\n\n";
  cset(p, title := word);
  fS shorter = deUserSaid(word);
  swing {
    JFrame f = getFrame(textPane);
    frameToFront(showFrame(shorter, textPane = jcenteredtextpane(text, style_bold(style_fontSize(24))), f));
    textPane.setEditable(false);
    focusConsole();
    thread {
      BufferedImage img = quickVisualize(shorter);
      addImageToTextPane(textPane, img);
      cset(p, imageID := "quickvis/" + urlencode(quickVisualize_preprocess(shorter)) + "/" + md5OfBufferedImage(img));
    }
  }
  true;
}

answer {
  if (showItemPage(s)) ret "OK";
}