!752

concepts.

concept Example {
  BWImage image;
  S imageMD5;
  S text;
}

p {
  conceptsAndBot();
  
  JTable table = showConceptsTable(Example);
  addFrameMenu(table, "Menu", 
    jmenuitem("Add example...", "addExample"));
  addToWindow(table, jbutton("Add example...", "addExample"));
}

svoid addExample {
  final new JTextField tf;
  final new ImageChooser ic;
  showTitledForm("Add Example - " + programTitle(),
    "Image", ic,
    "Text", tf,
    r {
      BWImage image = ic.getBWImage();
      if (image == null) ret;
      Example e = cnew(Example,
        +image,
        imageMD5 := md5OfBWImage(image),
        text := trim(tf.getText()));
      checkMarkAnimation("Example saved! " + e.id + " " + quote(e.text), 2);
    });
}