Win32Constants.st
author Claus Gittinger <cg@exept.de>
Wed, 23 Mar 2016 14:25:59 +0100
changeset 19417 9476ec4abe9a
parent 13193 2bea002a70c5
child 19431 3e697e4bcbf5
child 19498 9a85a0fdb706
permissions -rw-r--r--
#FEATURE class: Win32Constants class definition changed: #initialize
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
     1
"{ Encoding: utf8 }"
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
     2
12672
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
     3
"
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
     4
 COPYRIGHT (c) 2009 by eXept Software AG
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
     5
              All Rights Reserved
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
     6
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
     7
 This software is furnished under a license and may be used
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
     8
 only in accordance with the terms of that license and with the
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
     9
 inclusion of the above copyright notice.   This software may not
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    10
 be provided or otherwise made available to, or used by, any
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    11
 other person.  No title to or ownership of the software is
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    12
 hereby transferred.
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    13
"
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
"{ Package: 'stx:libbasic' }"
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    16
"{ NameSpace: Smalltalk }"
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    17
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
SharedPool subclass:#Win32Constants
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
	instanceVariableNames:''
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
	classVariableNames:'FILE_ATTRIBUTE_HIDDEN FILE_ATTRIBUTE_NORMAL
12379
3c014ba09285 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 12378
diff changeset
    21
		FILE_ATTRIBUTE_TEMPORARY FILE_ATTRIBUTE_DIRECTORY
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    22
		FILE_ATTRIBUTE_READONLY LOGPIXELSX LOGPIXELSY OFN_READONLY
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    23
		OFN_OVERWRITEPROMPT OFN_HIDEREADONLY OFN_NOCHANGEDIR OFN_SHOWHELP
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    24
		OFN_ENABLEHOOK OFN_ENABLETEMPLATE OFN_ENABLETEMPLATEHANDLE
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    25
		OFN_NOVALIDATE OFN_ALLOWMULTISELECT OFN_EXTENSIONDIFFERENT
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    26
		OFN_PATHMUSTEXIST OFN_FILEMUSTEXIST OFN_CREATEPROMPT
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    27
		OFN_SHAREAWARE OFN_NOREADONLYRETURN OFN_NOTESTFILECREATE
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    28
		OFN_NONETWORKBUTTON OFN_NOLONGNAMES OFN_EXPLORER
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    29
		OFN_NODEREFERENCELINKS OFN_LONGNAMES OFN_ENABLEINCLUDENOTIFY
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    30
		OFN_ENABLESIZING OFN_DONTADDTORECENT OFN_FORCESHOWHIDDEN
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    31
		OFN_EX_NOPLACESBAR OFN_SHAREFALLTHROUGH OFN_SHARENOWARN
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    32
		OFN_SHAREWARN'
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
	poolDictionaries:''
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
	category:'OS-Windows'
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
!
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
!Win32Constants class methodsFor:'documentation'!
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
12672
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    39
copyright
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    40
"
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    41
 COPYRIGHT (c) 2009 by eXept Software AG
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    42
              All Rights Reserved
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    43
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    44
 This software is furnished under a license and may be used
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    45
 only in accordance with the terms of that license and with the
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    46
 inclusion of the above copyright notice.   This software may not
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    47
 be provided or otherwise made available to, or used by, any
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    48
 other person.  No title to or ownership of the software is
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    49
 hereby transferred.
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    50
"
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    51
!
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    52
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
documentation
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
"
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
    contains (will, eventually) win32 OS constants.
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
"
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
! !
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
!Win32Constants class methodsFor:'initialization'!
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
initialize
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
    "Invoked at system start or when the class is dynamically loaded."
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
12379
3c014ba09285 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 12378
diff changeset
    64
    FILE_ATTRIBUTE_READONLY := 1.
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
    FILE_ATTRIBUTE_HIDDEN := 2.
12379
3c014ba09285 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 12378
diff changeset
    66
    FILE_ATTRIBUTE_DIRECTORY := 16.
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
    FILE_ATTRIBUTE_NORMAL := 128.
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
    FILE_ATTRIBUTE_TEMPORARY := 256.
13193
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
    69
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
    70
    LOGPIXELSX := 88.
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
    71
    LOGPIXELSY := 90.
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
    72
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    73
    OFN_READONLY := 16r01.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    74
    OFN_OVERWRITEPROMPT := 16r2.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    75
    OFN_HIDEREADONLY := 16r4.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    76
    OFN_NOCHANGEDIR := 16r8.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    77
    OFN_SHOWHELP := 16r10.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    78
    OFN_ENABLEHOOK := 16r20.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    79
    OFN_ENABLETEMPLATE := 16r40.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    80
    OFN_ENABLETEMPLATEHANDLE := 16r80.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    81
    OFN_NOVALIDATE := 16r100.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    82
    OFN_ALLOWMULTISELECT := 16r200.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    83
    OFN_EXTENSIONDIFFERENT := 16r400.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    84
    OFN_PATHMUSTEXIST := 16r800.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    85
    OFN_FILEMUSTEXIST := 16r1000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    86
    OFN_CREATEPROMPT := 16r2000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    87
    OFN_SHAREAWARE := 16r4000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    88
    OFN_NOREADONLYRETURN := 16r8000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    89
    OFN_NOTESTFILECREATE := 16r10000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    90
    OFN_NONETWORKBUTTON := 16r20000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    91
    OFN_NOLONGNAMES := 16r40000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    92
    OFN_EXPLORER := 16r80000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    93
    OFN_NODEREFERENCELINKS := 16r100000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    94
    OFN_LONGNAMES := 16r200000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    95
    OFN_ENABLEINCLUDENOTIFY := 16r400000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    96
    OFN_ENABLESIZING := 16r800000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    97
    OFN_DONTADDTORECENT := 16r2000000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    98
    OFN_FORCESHOWHIDDEN := 16r10000000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    99
    OFN_EX_NOPLACESBAR := 16r1.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   100
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   101
    OFN_SHAREFALLTHROUGH := 16r2.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   102
    OFN_SHARENOWARN := 16r1.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   103
    OFN_SHAREWARN := 16r0.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   104
13193
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
   105
    "Modified: / 24-12-2010 / 11:17:57 / cg"
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   106
! !
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   107
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   108
!Win32Constants class methodsFor:'documentation'!
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   109
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   110
version_CVS
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   111
    ^ '$Header$'
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   112
! !
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   113
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   114
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   115
Win32Constants initialize!