altosuilib: Make dialogs mostly scrollable

[fw/altos] / altosuilib / AltosUIDialog.java

diff --git a/altosuilib/AltosUIDialog.java b/altosuilib/AltosUIDialog.java
index 34bd50d80ecf82ffaec1156aab534362abaa345e..be883a1479baa48fe486c8bd1f01a554394640d1 100644 (file)
--- a/altosuilib/AltosUIDialog.java
+++ b/altosuilib/AltosUIDialog.java
@@ -30,6 +30,30 @@ class AltosUIDialogListener extends WindowAdapter {
 
 public class AltosUIDialog extends JDialog implements AltosUIListener {
 
+       private Container scrollPane;
+
+       public Container getScrollablePane() {
+               if (scrollPane == null) {
+                       Container content = super.getContentPane();
+                       /* Create a container to hold the dialog contents */
+                       scrollPane = new Container();
+
+                       /* Make an opaque box to use the right color */
+                       Box box = new Box(BoxLayout.X_AXIS);
+                       box.add(scrollPane);
+                       box.setOpaque(true);
+
+                       /* Create a scrollpane to hold the box */
+                       JScrollPane scroll = new JScrollPane();
+                       JViewport view = scroll.getViewport();
+                       view.add(box);
+
+                       /* Add the scroll pane to the top level */
+                       content.add(scroll);
+               }
+               return (Container) scrollPane;
+       }
+
        public void ui_changed(String look_and_feel) {
                SwingUtilities.updateComponentTreeUI(this);
                this.pack();