src/Tools/GraphBrowser/awt/TextFrame.java
author wenzelm
Mon, 28 Oct 2024 08:48:31 +0100
changeset 81294 108284c8cbfd
parent 74015 12b1f4649ab1
permissions -rw-r--r--
removed obsolete markup for "open_block" (see also d5ad89fda714): Isabelle/Scala directly supports XML.Elem pretty-printing;

/***************************************************************************
  Title:      awt/TextFrame.java
  Author:     Stefan Berghofer, TU Muenchen

  This class defines a simple text viewer.
***************************************************************************/

package isabelle.awt;

import java.awt.*;
import java.awt.event.*;

public class TextFrame extends Frame implements ActionListener {
	public void actionPerformed(ActionEvent evt) {
		setVisible(false);
	}

	public TextFrame(String title,String text) {
		super(title);
		TextArea ta = new TextArea(text,200,80);
		Button bt = new Button("Dismiss");
		bt.addActionListener(this);
		ta.setEditable(false);
		add("Center", ta);
		add("South", bt);
	}
}