ui/src/split/BdrVBTClass.i3


Copyright (C) 1994, Digital Equipment Corp.
 File: BdrVBTClass.i3, by cgn, Tue Apr 21 22:00:25 1987 
<*PRAGMA LL*>

INTERFACE BdrVBTClass;

IMPORT BorderedVBT, Rect, Axis;

TYPE
  Private = BorderedVBT.Public OBJECT
              bSize: ARRAY Axis.T OF INTEGER;  (* borderSizes in pixels *)
            METHODS <* LL.sup = VBT.mu *>
              repaintBorder (READONLY clip: Rect.T)
            END;
The repaint, redisplay, and reshape methods invoke repaintBorder after adjusting the child. The array bSize is automatically computed after a call to SetSize or to rescreen.

REVEAL BorderedVBT.T <: Private;

END BdrVBTClass.