8944
|
1 |
; View defaultStyle:#mswindows10
|
8940
|
2 |
;
|
|
3 |
; $Header$
|
|
4 |
|
8944
|
5 |
ToolbarIconLibrary ?(Smalltalk at:#Windows10ToolbarIconLibrary) ? (Smalltalk at:#Windows8ToolbarIconLibrary) ? (Smalltalk at:#XPToolbarIconLibrary) ? GenericToolbarIconLibrary
|
|
6 |
|
8940
|
7 |
#include 'mswindows8.style'
|
|
8 |
|
8944
|
9 |
name #win10
|
|
10 |
comment 'Windows10 lookalike (unfinished)'
|
|
11 |
previewFileName 'viewStyleSample_win10.png'
|
8940
|
12 |
|
|
13 |
#if (Language == #german) or:[Language == #de]
|
8944
|
14 |
comment 'an Windows10 angelehnter Stil (unvollständig)'
|
8940
|
15 |
#endif
|
|
16 |
|
|
17 |
#if (Language == #french) or:[Language == #fr]
|
8944
|
18 |
comment 'Un style qui résemble Windows10 (incomplet)'
|
8940
|
19 |
#endif
|
|
20 |
|
|
21 |
;
|
|
22 |
; unfinished
|
|
23 |
;
|
|
24 |
|
8944
|
25 |
menu.enteredLevel 0
|
8940
|
26 |
scrollableView.level 0
|
|
27 |
scrolledView.level 0
|
8943
|
28 |
; currently has trouble on win machines
|
8941
|
29 |
; scrollBar.hideIfPointerOutside true
|
8944
|
30 |
|
|
31 |
|
|
32 |
arrowButton.upForm (ToolbarIconLibrary scrollUpOffIcon)
|
|
33 |
arrowButton.enteredUpForm (ToolbarIconLibrary scrollUpOffEnteredIcon)
|
|
34 |
arrowButton.activeUpForm (ToolbarIconLibrary scrollUpActiveIcon)
|
|
35 |
arrowButton.disabledUpForm (ToolbarIconLibrary scrollUpDisabledIcon)
|
|
36 |
|
|
37 |
arrowButton.downForm (ToolbarIconLibrary scrollDownOffIcon)
|
|
38 |
arrowButton.enteredDownForm (ToolbarIconLibrary scrollDownOffEnteredIcon)
|
|
39 |
arrowButton.activeDownForm (ToolbarIconLibrary scrollDownActiveIcon)
|
|
40 |
arrowButton.disabledDownForm (ToolbarIconLibrary scrollDownDisabledIcon)
|
|
41 |
|
|
42 |
arrowButton.leftForm (ToolbarIconLibrary scrollLeftOffIcon)
|
|
43 |
arrowButton.enteredLeftForm (ToolbarIconLibrary scrollLeftOffEnteredIcon)
|
|
44 |
arrowButton.activeLeftForm (ToolbarIconLibrary scrollLeftActiveIcon)
|
|
45 |
arrowButton.disabledLeftForm (ToolbarIconLibrary scrollLeftDisabledIcon)
|
|
46 |
|
|
47 |
arrowButton.rightForm (ToolbarIconLibrary scrollRightOffIcon)
|
|
48 |
arrowButton.enteredRightForm (ToolbarIconLibrary scrollRightOffEnteredIcon)
|
|
49 |
arrowButton.activeRightForm (ToolbarIconLibrary scrollRightActiveIcon)
|
|
50 |
arrowButton.disabledRightForm (ToolbarIconLibrary scrollRightDisabledIcon)
|
|
51 |
|
|
52 |
arrowButton.leftFormFile nil
|
|
53 |
arrowButton.enteredLeftFormFile nil
|
|
54 |
arrowButton.activeLeftFormFile nil
|
|
55 |
arrowButton.disabledLeftFormFile nil
|
|
56 |
|
|
57 |
arrowButton.rightFormFile nil
|
|
58 |
arrowButton.enteredRightFormFile nil
|
|
59 |
arrowButton.activeRightFormFile nil
|
|
60 |
arrowButton.disabledRightFormFile nil
|