|
Packit |
b099d7 |
!
|
|
Packit |
b099d7 |
! Motif
|
|
Packit |
b099d7 |
!
|
|
Packit |
b099d7 |
! Copyright (c) 1987-2012, The Open Group. All rights reserved.
|
|
Packit |
b099d7 |
!
|
|
Packit |
b099d7 |
! These libraries and programs are free software; you can
|
|
Packit |
b099d7 |
! redistribute them and/or modify them under the terms of the GNU
|
|
Packit |
b099d7 |
! Lesser General Public License as published by the Free Software
|
|
Packit |
b099d7 |
! Foundation; either version 2 of the License, or (at your option)
|
|
Packit |
b099d7 |
! any later version.
|
|
Packit |
b099d7 |
!
|
|
Packit |
b099d7 |
! These libraries and programs are distributed in the hope that
|
|
Packit |
b099d7 |
! they will be useful, but WITHOUT ANY WARRANTY; without even the
|
|
Packit |
b099d7 |
! implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
|
Packit |
b099d7 |
! PURPOSE. See the GNU Lesser General Public License for more
|
|
Packit |
b099d7 |
! details.
|
|
Packit |
b099d7 |
!
|
|
Packit |
b099d7 |
! You should have received a copy of the GNU Lesser General Public
|
|
Packit |
b099d7 |
! License along with these librararies and programs; if not, write
|
|
Packit |
b099d7 |
! to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
|
|
Packit |
b099d7 |
! Floor, Boston, MA 02110-1301 USA
|
|
Packit |
b099d7 |
!
|
|
Packit |
b099d7 |
!
|
|
Packit |
b099d7 |
! HISTORY
|
|
Packit |
b099d7 |
!
|
|
Packit |
b099d7 |
! $XConsortium: EnumVal1.uil /main/7 1995/07/13 20:26:53 drk $
|
|
Packit |
b099d7 |
!******************************************************************************
|
|
Packit |
b099d7 |
module Test
|
|
Packit |
b099d7 |
version = 'v1.0'
|
|
Packit |
b099d7 |
names = case_sensitive
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
include file "EnumVal1.msg";
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
procedure
|
|
Packit |
b099d7 |
exit_test();
|
|
Packit |
b099d7 |
Report_Callback(string);
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
value
|
|
Packit |
b099d7 |
wheat : color('wheat');
|
|
Packit |
b099d7 |
navy : color('navy');
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
object ! The main window widget.
|
|
Packit |
b099d7 |
TopManager : XmBulletinBoard {
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
arguments {
|
|
Packit |
b099d7 |
XmNx = 0;
|
|
Packit |
b099d7 |
XmNy = 0;
|
|
Packit |
b099d7 |
XmNdialogTitle =
|
|
Packit |
b099d7 |
compound_string ("Enumerated Values Test No. 1");
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
controls {
|
|
Packit |
b099d7 |
XmBulletinBoard Bulletin_Board;
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
value
|
|
Packit |
b099d7 |
sky_blue: color ('SkyBlue');
|
|
Packit |
b099d7 |
black: color ('black');
|
|
Packit |
b099d7 |
align_value: XmALIGNMENT_END;
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
object
|
|
Packit |
b099d7 |
Bulletin_Board : XmBulletinBoard {
|
|
Packit |
b099d7 |
arguments {
|
|
Packit |
b099d7 |
XmNborderWidth = 1;
|
|
Packit |
b099d7 |
XmNbackground = sky_blue;
|
|
Packit |
b099d7 |
XmNmarginWidth = 20;
|
|
Packit |
b099d7 |
XmNmarginHeight = 20;
|
|
Packit |
b099d7 |
XmNdefaultPosition = false;
|
|
Packit |
b099d7 |
XmNnoResize = true;
|
|
Packit |
b099d7 |
XmNresizePolicy = XmRESIZE_GROW;
|
|
Packit |
b099d7 |
XmNshadowType = XmSHADOW_ETCHED_OUT;
|
|
Packit |
b099d7 |
XmNshadowThickness = 10;
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
controls {
|
|
Packit |
b099d7 |
XmScrolledList ScrolledList1;
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
ScrolledList1 : XmScrolledList {
|
|
Packit |
b099d7 |
arguments {
|
|
Packit |
b099d7 |
XmNwidth = 200;
|
|
Packit |
b099d7 |
XmNheight = 80;
|
|
Packit |
b099d7 |
XmNshadowThickness = 4;
|
|
Packit |
b099d7 |
XmNitems = string_table (
|
|
Packit |
b099d7 |
'Scrolled List entry 1',
|
|
Packit |
b099d7 |
'Scrolled List entry the second',
|
|
Packit |
b099d7 |
'Scrolled List entry which is third',
|
|
Packit |
b099d7 |
'Scrolled List entry in the fourth place',
|
|
Packit |
b099d7 |
'Scrolled List entry - fifth, actually',
|
|
Packit |
b099d7 |
'Scrolled List entry VI',
|
|
Packit |
b099d7 |
'Scrolled List entry 111 (binary)',
|
|
Packit |
b099d7 |
'Scrolled List entry same as largest Tudor',
|
|
Packit |
b099d7 |
'Scrolled List entry 3 squared',
|
|
Packit |
b099d7 |
'Scrolled List entry Dante\'s perfect number',
|
|
Packit |
b099d7 |
'Scrolled List entry onze',
|
|
Packit |
b099d7 |
'Scrolled List entry 12 (just the number, please)',
|
|
Packit |
b099d7 |
'Scrolled List entry 13',
|
|
Packit |
b099d7 |
'Scrolled List entry 14',
|
|
Packit |
b099d7 |
'Scrolled List entry 15',
|
|
Packit |
b099d7 |
'Scrolled List entry 16',
|
|
Packit |
b099d7 |
'Scrolled List entry 17',
|
|
Packit |
b099d7 |
'Scrolled List entry 18',
|
|
Packit |
b099d7 |
'Scrolled List entry 19');
|
|
Packit |
b099d7 |
XmNvisibleItemCount = 7;
|
|
Packit |
b099d7 |
XmNselectionPolicy = XmMULTIPLE_SELECT;
|
|
Packit |
b099d7 |
XmNlistSizePolicy = XmCONSTANT;
|
|
Packit |
b099d7 |
XmNscrollBarDisplayPolicy = XmAS_NEEDED;
|
|
Packit |
b099d7 |
XmNscrollBarPlacement = XmTOP_LEFT;
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
};
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
|
|
Packit |
b099d7 |
end module;
|