/*
**      Newton Developer Technical Support Sample Code
**
**      slimPicker, A slimmer listPicker
**
**      by Jeremy Wyld, Newton Toolbox Engineering
**		   Maurice Sharp, Newton Developer Technical Support
**
**      Copyright © 1996 by Apple Computer, Inc.  All rights reserved.
**
**      You may incorporate this sample code into your applications without
**      restriction.  This sample code has been provided "AS IS" and the
**      responsibility for its operation is 100% yours.  You are not
**      permitted to modify and redistribute the source as "DTS Sample Code."
**      If you are going to re-distribute the source, we require that you
**      make it clear in the source that the code was descended from
**      Apple-provided sample code, but that you've made changes.
*/

// Constants for the slimPicker proto


// Values for the visibleChildrenFlags slot

constant vNewButton		:= (1 << 0);		// 1  - bit to show New button
constant vScrollers		:= (1 << 1);		// 2  - bit to show scrollers
constant vAZTabs			:= (1 << 2);		// 4  - bit to show AZTabs
constant vFolderTab		:= (1 << 3);		// 8  - bit to show FolderTab
constant vSelectionOnly	:= (1 << 4);		// 16 - bit to show SelectionOnly checkbox
constant vCloseBox		:= (1 << 5);		// 32 - bit to show CloseBox
constant vCounter			:= (1 << 6);		// 64 - bit to show selection counter

DefConst('vNOTVisible, BNOT(vVisible));

DefConst('vDivider,								//  \
	vNewButton +									//   \__	The existance of any of these
	vSelectionOnly +								//   /	forces the divider to be visible.
	vCloseBox +										//  /
	vCounter);										// /

// used by the selection counter
	
DefConst('kCounterStyle, {
	transferMode:	modeCopy,					// This is so the new count blasts over the old.
	penPattern:		vfNone,						// This is so the empty rect shape covers the old.
	fillPattern:	vfWhite,						// For the empty rect.
	font:				ROM_fontSystem9,			// I think you understand.
	justification:	'right						// Ditto.
});
