Win32Constants.st
author Claus Gittinger <cg@exept.de>
Tue, 09 Jul 2019 20:55:17 +0200
changeset 24417 03b083548da2
parent 19498 9a85a0fdb706
child 19500 49f06f2390fa
permissions -rw-r--r--
#REFACTORING by exept class: Smalltalk class changed: #recursiveInstallAutoloadedClassesFrom:rememberIn:maxLevels:noAutoload:packageTop:showSplashInLevels: Transcript showCR:(... bindWith:...) -> Transcript showCR:... with:...
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
19498
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
    32
		OFN_SHAREWARN FILE_NOTIFY_CHANGE_FILE_NAME
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
    33
		FILE_NOTIFY_CHANGE_DIR_NAME FILE_NOTIFY_CHANGE_ATTRIBUTES
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
    34
		FILE_NOTIFY_CHANGE_SIZE FILE_NOTIFY_CHANGE_LAST_WRITE
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
    35
		FILE_NOTIFY_CHANGE_LAST_ACCESS FILE_NOTIFY_CHANGE_CREATION
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
    36
		FILE_NOTIFY_CHANGE_SECURITY FILE_ACTION_ADDED FILE_ACTION_REMOVED
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
    37
		FILE_ACTION_MODIFIED FILE_ACTION_RENAMED_OLD_NAME
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
    38
		FILE_ACTION_RENAMED_NEW_NAME'
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
	poolDictionaries:''
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
	category:'OS-Windows'
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
!
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
!Win32Constants class methodsFor:'documentation'!
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
12672
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    45
copyright
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    46
"
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    47
 COPYRIGHT (c) 2009 by eXept Software AG
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    48
              All Rights Reserved
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    49
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    50
 This software is furnished under a license and may be used
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    51
 only in accordance with the terms of that license and with the
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    52
 inclusion of the above copyright notice.   This software may not
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    53
 be provided or otherwise made available to, or used by, any
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    54
 other person.  No title to or ownership of the software is
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    55
 hereby transferred.
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    56
"
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    57
!
fc6fe9cbba31 added: #copyright
Claus Gittinger <cg@exept.de>
parents: 12379
diff changeset
    58
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
documentation
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
"
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
    contains (will, eventually) win32 OS constants.
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
"
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
! !
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
!Win32Constants class methodsFor:'initialization'!
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
initialize
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
    "Invoked at system start or when the class is dynamically loaded."
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
12379
3c014ba09285 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 12378
diff changeset
    70
    FILE_ATTRIBUTE_READONLY := 1.
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
    FILE_ATTRIBUTE_HIDDEN := 2.
12379
3c014ba09285 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 12378
diff changeset
    72
    FILE_ATTRIBUTE_DIRECTORY := 16.
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
    FILE_ATTRIBUTE_NORMAL := 128.
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
    FILE_ATTRIBUTE_TEMPORARY := 256.
13193
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
    75
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
    76
    LOGPIXELSX := 88.
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
    77
    LOGPIXELSY := 90.
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
    78
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    79
    OFN_READONLY := 16r01.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    80
    OFN_OVERWRITEPROMPT := 16r2.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    81
    OFN_HIDEREADONLY := 16r4.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    82
    OFN_NOCHANGEDIR := 16r8.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    83
    OFN_SHOWHELP := 16r10.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    84
    OFN_ENABLEHOOK := 16r20.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    85
    OFN_ENABLETEMPLATE := 16r40.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    86
    OFN_ENABLETEMPLATEHANDLE := 16r80.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    87
    OFN_NOVALIDATE := 16r100.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    88
    OFN_ALLOWMULTISELECT := 16r200.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    89
    OFN_EXTENSIONDIFFERENT := 16r400.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    90
    OFN_PATHMUSTEXIST := 16r800.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    91
    OFN_FILEMUSTEXIST := 16r1000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    92
    OFN_CREATEPROMPT := 16r2000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    93
    OFN_SHAREAWARE := 16r4000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    94
    OFN_NOREADONLYRETURN := 16r8000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    95
    OFN_NOTESTFILECREATE := 16r10000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    96
    OFN_NONETWORKBUTTON := 16r20000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    97
    OFN_NOLONGNAMES := 16r40000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    98
    OFN_EXPLORER := 16r80000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
    99
    OFN_NODEREFERENCELINKS := 16r100000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   100
    OFN_LONGNAMES := 16r200000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   101
    OFN_ENABLEINCLUDENOTIFY := 16r400000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   102
    OFN_ENABLESIZING := 16r800000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   103
    OFN_DONTADDTORECENT := 16r2000000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   104
    OFN_FORCESHOWHIDDEN := 16r10000000.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   105
    OFN_EX_NOPLACESBAR := 16r1.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   106
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   107
    OFN_SHAREFALLTHROUGH := 16r2.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   108
    OFN_SHARENOWARN := 16r1.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   109
    OFN_SHAREWARN := 16r0.
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   110
19498
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   111
    FILE_NOTIFY_CHANGE_FILE_NAME := 16r0001.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   112
    FILE_NOTIFY_CHANGE_DIR_NAME := 16r0002.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   113
    FILE_NOTIFY_CHANGE_ATTRIBUTES := 16r0004.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   114
    FILE_NOTIFY_CHANGE_SIZE := 16r0008.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   115
    FILE_NOTIFY_CHANGE_LAST_WRITE := 16r0010.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   116
    FILE_NOTIFY_CHANGE_LAST_ACCESS := 16r0020.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   117
    FILE_NOTIFY_CHANGE_CREATION := 16r0040.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   118
    FILE_NOTIFY_CHANGE_SECURITY := 16r0100.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   119
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   120
    FILE_ACTION_ADDED := 16r01.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   121
    FILE_ACTION_REMOVED := 16r02.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   122
    FILE_ACTION_MODIFIED := 16r03.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   123
    FILE_ACTION_RENAMED_OLD_NAME := 16r04.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   124
    FILE_ACTION_RENAMED_NEW_NAME := 16r05.
9a85a0fdb706 #FEATURE
Claus Gittinger <cg@exept.de>
parents: 19417
diff changeset
   125
13193
Claus Gittinger <cg@exept.de>
parents: 12672
diff changeset
   126
    "Modified: / 24-12-2010 / 11:17:57 / cg"
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   127
! !
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   128
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   129
!Win32Constants class methodsFor:'documentation'!
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   130
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   131
version_CVS
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   132
    ^ '$Header$'
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   133
! !
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   134
19417
9476ec4abe9a #FEATURE
Claus Gittinger <cg@exept.de>
parents: 13193
diff changeset
   135
12378
416690a1ffad initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   136
Win32Constants initialize!