!
! Motif
!
! Copyright (c) 1987-2012, The Open Group. All rights reserved.
!
! These libraries and programs are free software; you can
! redistribute them and/or modify them under the terms of the GNU
! Lesser General Public License as published by the Free Software
! Foundation; either version 2 of the License, or (at your option)
! any later version.
!
! These libraries and programs are distributed in the hope that
! they will be useful, but WITHOUT ANY WARRANTY; without even the
! implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
! PURPOSE. See the GNU Lesser General Public License for more
! details.
!
! You should have received a copy of the GNU Lesser General Public
! License along with these librararies and programs; if not, write
! to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
! Floor, Boston, MA 02110-1301 USA
!
!
! HISTORY
!
! $XConsortium: EnumVal3.uil /main/4 1995/07/13 20:37:04 drk $
!******************************************************************************
module Test
version = 'v1.0'
names = case_sensitive
include file "EnumVal3.msg";
procedure
exit_test();
Report_Callback(string);
value
wheat : color('wheat');
navy : color('navy');
object ! The main window widget.
TopManager : XmBulletinBoard {
arguments {
XmNx = 0;
XmNy = 0;
XmNdialogTitle =
compound_string ("Enumerated Values Test No. 3");
};
controls {
XmBulletinBoard Bulletin_Board;
};
};
value
sky_blue: color ('SkyBlue');
black: color ('black');
align_value: XmALIGNMENT_END;
object
Bulletin_Board : XmBulletinBoard {
arguments {
XmNborderWidth = 1;
XmNbackground = sky_blue;
XmNmarginWidth = 20;
XmNmarginHeight = 20;
XmNdefaultPosition = false;
XmNnoResize = true;
XmNresizePolicy = XmRESIZE_GROW;
XmNshadowType = XmSHADOW_ETCHED_OUT;
XmNshadowThickness = 10;
};
controls {
XmRowColumn RowCol1;
};
};
RowCol1 : XmRowColumn {
arguments {
XmNunitType = XmPIXELS;
XmNx = 30;
XmNy = 30;
XmNborderWidth = 2;
XmNrowColumnType = XmMENU_BAR;
XmNisHomogeneous = false;
XmNpacking = XmPACK_NONE;
XmNnumColumns = 2;
XmNorientation = XmVERTICAL;
XmNmarginHeight = 10;
XmNmarginWidth = 10;
};
controls {
XmCascadeButton CascadeButtonRC1;
XmCascadeButton CascadeButtonRC2;
XmCascadeButton CascadeButtonRC3;
};
};
CascadeButtonRC1 : XmCascadeButton {
arguments {
XmNx = 20;
XmNy = 60;
XmNlabelString = "Entry 1";
};
};
CascadeButtonRC2 : XmCascadeButton {
arguments {
XmNx = 30;
XmNy = 35;
XmNlabelString = "Entry 2";
};
};
CascadeButtonRC3 : XmCascadeButton {
arguments {
XmNx = 10;
XmNy = 10;
XmNlabelString = "Entry 3";
};
};
end module;