Copyright (C) 1992, Digital Equipment Corporation
All rights reserved.
See the file COPYRIGHT for a full description.
by Steve Glassman, Mark Manasse and Greg Nelson
Last modified on Mon Feb 24 13:52:53 PST 1992 by muller
modified on Wed Sep 11 15:28:15 PDT 1991 by msm
<*PRAGMA LL*>
INTERFACE BtnVBTClass;
IMPORT ButtonVBT;
TYPE T = ButtonVBT.Public BRANDED OBJECT
ready, armed := FALSE
END;
The ready
boolean is set if the pre
method has been called.
The armed
boolean is set if an up transition over the button
would cause the action procedure to be called.
REVEAL ButtonVBT.T <: T;
END BtnVBTClass.