Windows8ToolbarIconLibrary.st
author Claus Gittinger <cg@exept.de>
Sun, 11 Dec 2016 22:13:54 +0100
changeset 6006 92827801f6ed
parent 5171 9519ad3ccfb7
child 6049 912263613f7d
permissions -rw-r--r--
#UI_ENHANCEMENT by cg class: GenericToolbarIconLibrary changed: #deleteClassFromStart24x24Icon #deleteClassToEnd24x24Icon these icons did ot work on a dark grey background

"{ Package: 'stx:libwidg' }"

VistaToolbarIconLibrary subclass:#Windows8ToolbarIconLibrary
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Interface-Smalltalk'
!

!Windows8ToolbarIconLibrary class methodsFor:'documentation'!

documentation
"
    ToolbarIconLibrary := Windows8ToolbarIconLibrary

    This is a style specific icon library for a windows8 look.

    Never access this iconlibrary directly from an application -
    always use ToolbarIconLibrary, which is an alias to one of the style specific
    icon libs.

    Notice and Warning:
        only redefine existing icons here; never add ionly to here.
        For every icon-method here, there MUST be a corresponding (albeit
        possibly ugly) icon-method in GenericToolBarIcon.
"
! !

!Windows8ToolbarIconLibrary class methodsFor:'image specs'!

downArrowEnteredIcon
    <resource: #image>
    "This resource specification was automatically generated
     by the ImageEditor of ST/X."
    "Do not manually edit this!! If it is corrupted,
     the ImageEditor may not be able to read the specification."
    "
     self downArrowEnteredIcon inspect
     ImageEditor openOnClass:self andSelector:#downArrowEnteredIcon
     Icon flushCachedIcons"
    
    ^ Icon constantNamed:'Windows8ToolbarIconLibrary downArrowEnteredIcon'
        ifAbsentPut:[
            (Depth1Image new)
                width:15;
                height:14;
                photometric:(#palette);
                bitsPerSample:(#[ 1 ]);
                samplesPerPixel:(1);
                bits:(ByteArray 
                            fromPackedString:'@@@@@@@@@@@HH@1 C.@G0@N@@P@@@@@@@@@@@@@a');
                colorMapFromArray:#[ 240 240 240 0 0 0 ];
                mask:((ImageMask new)
                            width:15;
                            height:14;
                            bits:(ByteArray 
                                        fromPackedString:'@@D@@P@A@@DHHP1!!C.DG0PNA@PD@@P@A@@D@@P@a');
                            yourself);
                yourself
        ]
!

downArrowPassiveIcon
    <resource: #image>
    "This resource specification was automatically generated
     by the ImageEditor of ST/X."
    "Do not manually edit this!! If it is corrupted,
     the ImageEditor may not be able to read the specification."
    "
     self downArrowPassiveIcon inspect
     ImageEditor openOnClass:self andSelector:#downArrowPassiveIcon
     Icon flushCachedIcons"
    
    ^ Icon constantNamed:'Windows8ToolbarIconLibrary downArrowPassiveIcon'
        ifAbsentPut:[
            (Depth1Image new)
                width:15;
                height:14;
                photometric:(#palette);
                bitsPerSample:(#[ 1 ]);
                samplesPerPixel:(1);
                bits:(ByteArray 
                            fromPackedString:'@@@@@@@@@@@HH@1 C.@G0@N@@P@@@@@@@@@@@@@a');
                colorMapFromArray:#[ 240 240 240 96 96 96 ];
                mask:((ImageMask new)
                            width:15;
                            height:14;
                            bits:(ByteArray 
                                        fromPackedString:'@@D@@P@A@@DHHP1!!C.DG0PNA@PD@@P@A@@D@@P@a');
                            yourself);
                yourself
        ]
! !

!Windows8ToolbarIconLibrary class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/libwidg/Windows8ToolbarIconLibrary.st,v 1.4 2014-11-23 13:56:45 cg Exp $'
!

version_CVS
    ^ '$Header: /cvs/stx/stx/libwidg/Windows8ToolbarIconLibrary.st,v 1.4 2014-11-23 13:56:45 cg Exp $'
! !