hg/stx-libview: styles/mswindows.common@6a9b754ca6d3 (annotated)

199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	1	; common for all mswindows-like styles
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	2	;
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	3	; this is not yet completed
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	4	;
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	5	; $Header: /cvs/stx/stx/libview/styles/mswindows.common,v 1.5 1997-11-02 19:49:07 cg Exp $
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	6
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	7	name #mswindows
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	8
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	9	;this seems not fully true, buttons
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	10	;and scrollers show some 3D.
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	11	;anyway, most other views are flat.
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	12	is3D false
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	13
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	14	#if Display hasGreyscales not
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	15	viewGrey Color white
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	16	#endif
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	17
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	18	borderWidth 1
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	19	popupBorderWidth 1
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	20	viewBackground =viewGrey
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	21
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	22	font Font family:'helvetica' face:'bold' style:'roman' size:12
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	23	textFont Font family:'courier' face:'bold' style:'roman' size:12
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	24
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	25	scrollBar.position #right
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	26	scrollBar.buttonPositions #around
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	27	scrollBar.spacing 0
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	28
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	29	scroller.borderWidth 1
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	30	#if Display hasGreyscales
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	31	scroller.viewBackground Color grey:80
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	32	#else
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	33	scroller.viewBackground Color white
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	34	#endif
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	35	scroller.fullViewBackground Color white
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	36	scroller.thumbColor Color grey:80
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	37
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	38	scroller.thumbLevel 3 "2"
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	39	scroller.thumbFixHeight true
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	40	scroller.thumbEdgeStyle #soft
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	41	scroller.thumbFrameColor Color black
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	42	scroller.ghostFrameColor Color darkGrey
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	43
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	44	; variablePanel.showHandle false
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	45
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	46	framedBox.labelPosition #topLeft
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	47	framedBox.3DFrame false
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	48
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	49	button.edgeStyle #soft
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	50	button.activeLevel -1
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	51	button.passiveLevel 4 "3"
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	52	button.disabledForegroundColor Color darkGrey
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	53	button.borderWidth 0
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	54
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	55	#if Display hasGreyscales
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	56	button.foregroundColor Color black
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	57	button.backgroundColor Color grey:80
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	58	button.activeForegroundColor =buttonForegroundColor
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	59	button.activeBackgroundColor =buttonBackgroundColor
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	60	#endif
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	61
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	62	button.returnButtonHasBorder true
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	63
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	64	arrowButton.style #mswindows
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	65	arrowButton.upFormFile 'ScrollUp_win.xbm'
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	66	arrowButton.downFormFile 'ScrollDn_win.xbm'
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	67	arrowButton.leftFormFile 'ScrollLt_win.xbm'
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	68	arrowButton.rightFormFile 'ScrollRt_win.xbm'
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	69
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	70	checkToggle.bitmapFile nil
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	71	checkToggle.style #cross
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	72	checkToggle.activeLevel 0
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	73	checkToggle.passiveLevel 0
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	74	checkToggle.borderWidth 1
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	75	checkToggle.activeBackgroundColor Color white
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	76	checkToggle.backgroundColor Color white
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	77
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	78	;
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	79	; selection-in-list
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	80	;
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	81	#if Display hasColors
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	82	selection.hilightForegroundColor Color white
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	83	selection.hilightBackgroundColor Color blue
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	84	selection.hilightFrameColor Color black
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	85	#endif
b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	86
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	87	menuView.background Color white
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	88
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	89	pullDownMenu.keepMenu true
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	90
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	91	popUpList.popPosition #below
199 b8f89a06090b Initial revision Claus Gittinger <cg@exept.de> parents: diff changeset	92
1620 49812898bfe2 html defs for monochrome displays Claus Gittinger <cg@exept.de> parents: 1448 diff changeset	93	#if Display hasGrayscales not
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	94	html.anchorUnderline true
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	95	html.anchorForegroundColor Color black
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	96	html.backgroundColor Color white
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	97	html.activeAnchorForegroundColor Color black
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	98	html.activeAnchorBackgroundColor =html.backgroundColor
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	99	html.visitedAnchorForegroundColor Color black
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	100	html.exampleAnchorForegroundColor Color black
1620 49812898bfe2 html defs for monochrome displays Claus Gittinger <cg@exept.de> parents: 1448 diff changeset	101	#else
1948 6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	102	html.backgroundColor Color white
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	103	html.anchorForegroundColor Color green darkened
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	104	html.visitedAnchorForegroundColor =html.anchorForegroundColor darkened darkened
6a9b754ca6d3 * empty log message * Claus Gittinger <cg@exept.de> parents: 1620 diff changeset	105	html.anchorUnderlines true
1620 49812898bfe2 html defs for monochrome displays Claus Gittinger <cg@exept.de> parents: 1448 diff changeset	106	#endif
49812898bfe2 html defs for monochrome displays Claus Gittinger <cg@exept.de> parents: 1448 diff changeset	107

author	Claus Gittinger <cg@exept.de>
	Sun, 02 Nov 1997 20:49:19 +0100
changeset 1948	6a9b754ca6d3
parent 1620	49812898bfe2
child 1951	5290a36652db
permissions	-rw-r--r--