! © 2000 Compaq Computer Corporation ! ! COMPAQ Registered in U.S. Patent and Trademark Office. ! ! Confidential computer software. Valid license from Compaq required for ! possession, use or copying. Consistent with FAR 12.211 and 12.212, Commercial ! Computer Software, Computer Software Documentation, and Technical Data for ! Commercial Items are licensed to the U.S. Government under vendor's standard ! commercial license. ! ! ! (c) Copyright 1989, 1990, 1991, 1992 OPEN SOFTWARE FOUNDATION, INC. ! ALL RIGHTS RESERVED ! ! ! Motif Release 1.2 ! ! $RCSfile: hellomotif.uil,v $ $Revision: 1.6.2.2 $ $Date: 1992/03/27 02:49:27 $ !* !******************************************************************************* module helloworld version = 'v1.0' names = case_sensitive procedure helloworld_button_activate(); object helloworld_main : XmForm { arguments { XmNmarginWidth = 5; XmNmarginHeight = 5; }; controls { XmLabel helloworld_label; XmPushButton helloworld_button; }; }; object helloworld_button : XmPushButton { arguments { XmNbottomAttachment = XmATTACH_FORM; XmNleftAttachment = XmATTACH_POSITION; XmNleftPosition = 50; XmNleftOffset = -40; XmNlabelString = compound_string('Hello',separate=true) & 'World!'; }; callbacks { XmNactivateCallback = procedure helloworld_button_activate(); }; }; object helloworld_label : XmLabel { arguments { XmNtopAttachment = XmATTACH_FORM; XmNbottomAttachment = XmATTACH_WIDGET; XmNbottomWidget = XmPushButton helloworld_button; XmNleftAttachment = XmATTACH_FORM; XmNrightAttachment = XmATTACH_FORM; XmNlabelString = compound_string('Press button once',separate=true) & compound_string('to change label;',separate=true) & 'twice to exit.'; }; }; end module;