/packages/univint/src/FinderRegistry.pas
Pascal | 840 lines | 375 code | 84 blank | 381 comment | 0 complexity | e45e0a8fbf168a74c159b1ea2ccf805d MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
1{ 2 File: OpenScripting/FinderRegistry.h 3 4 Contains: Data types for Finder AppleEvents 5 6 Version: OSA-148~28 7 8 Copyright: � 1991-2008 by Apple Computer, Inc., all rights reserved. 9 10 Bugs?: For bug reports, consult the following page on 11 the World Wide Web: 12 13 http://www.freepascal.org/bugs.html 14 15} 16 17{ Pascal Translation Updated: Gorazd Krosl <gorazd_1957@yahoo.ca>, October 2009 } 18{ Pascal Translation Updated: Jonas Maebe, <jonas@freepascal.org>, October 2012 } 19{ 20 Modified for use with Free Pascal 21 Version 308 22 Please report any bugs to <gpc@microbizz.nl> 23} 24 25{$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE} 26{$mode macpas} 27{$packenum 1} 28{$macro on} 29{$inline on} 30{$calling mwpascal} 31 32unit FinderRegistry; 33interface 34{$setc UNIVERSAL_INTERFACES_VERSION := $0400} 35{$setc GAP_INTERFACES_VERSION := $0308} 36 37{$ifc not defined USE_CFSTR_CONSTANT_MACROS} 38 {$setc USE_CFSTR_CONSTANT_MACROS := TRUE} 39{$endc} 40 41{$ifc defined CPUPOWERPC and defined CPUI386} 42 {$error Conflicting initial definitions for CPUPOWERPC and CPUI386} 43{$endc} 44{$ifc defined FPC_BIG_ENDIAN and defined FPC_LITTLE_ENDIAN} 45 {$error Conflicting initial definitions for FPC_BIG_ENDIAN and FPC_LITTLE_ENDIAN} 46{$endc} 47 48{$ifc not defined __ppc__ and defined CPUPOWERPC32} 49 {$setc __ppc__ := 1} 50{$elsec} 51 {$setc __ppc__ := 0} 52{$endc} 53{$ifc not defined __ppc64__ and defined CPUPOWERPC64} 54 {$setc __ppc64__ := 1} 55{$elsec} 56 {$setc __ppc64__ := 0} 57{$endc} 58{$ifc not defined __i386__ and defined CPUI386} 59 {$setc __i386__ := 1} 60{$elsec} 61 {$setc __i386__ := 0} 62{$endc} 63{$ifc not defined __x86_64__ and defined CPUX86_64} 64 {$setc __x86_64__ := 1} 65{$elsec} 66 {$setc __x86_64__ := 0} 67{$endc} 68{$ifc not defined __arm__ and defined CPUARM} 69 {$setc __arm__ := 1} 70{$elsec} 71 {$setc __arm__ := 0} 72{$endc} 73 74{$ifc defined cpu64} 75 {$setc __LP64__ := 1} 76{$elsec} 77 {$setc __LP64__ := 0} 78{$endc} 79 80 81{$ifc defined __ppc__ and __ppc__ and defined __i386__ and __i386__} 82 {$error Conflicting definitions for __ppc__ and __i386__} 83{$endc} 84 85{$ifc defined __ppc__ and __ppc__} 86 {$setc TARGET_CPU_PPC := TRUE} 87 {$setc TARGET_CPU_PPC64 := FALSE} 88 {$setc TARGET_CPU_X86 := FALSE} 89 {$setc TARGET_CPU_X86_64 := FALSE} 90 {$setc TARGET_CPU_ARM := FALSE} 91 {$setc TARGET_OS_MAC := TRUE} 92 {$setc TARGET_OS_IPHONE := FALSE} 93 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 94 {$setc TARGET_OS_EMBEDDED := FALSE} 95{$elifc defined __ppc64__ and __ppc64__} 96 {$setc TARGET_CPU_PPC := FALSE} 97 {$setc TARGET_CPU_PPC64 := TRUE} 98 {$setc TARGET_CPU_X86 := FALSE} 99 {$setc TARGET_CPU_X86_64 := FALSE} 100 {$setc TARGET_CPU_ARM := FALSE} 101 {$setc TARGET_OS_MAC := TRUE} 102 {$setc TARGET_OS_IPHONE := FALSE} 103 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 104 {$setc TARGET_OS_EMBEDDED := FALSE} 105{$elifc defined __i386__ and __i386__} 106 {$setc TARGET_CPU_PPC := FALSE} 107 {$setc TARGET_CPU_PPC64 := FALSE} 108 {$setc TARGET_CPU_X86 := TRUE} 109 {$setc TARGET_CPU_X86_64 := FALSE} 110 {$setc TARGET_CPU_ARM := FALSE} 111{$ifc defined(iphonesim)} 112 {$setc TARGET_OS_MAC := FALSE} 113 {$setc TARGET_OS_IPHONE := TRUE} 114 {$setc TARGET_IPHONE_SIMULATOR := TRUE} 115{$elsec} 116 {$setc TARGET_OS_MAC := TRUE} 117 {$setc TARGET_OS_IPHONE := FALSE} 118 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 119{$endc} 120 {$setc TARGET_OS_EMBEDDED := FALSE} 121{$elifc defined __x86_64__ and __x86_64__} 122 {$setc TARGET_CPU_PPC := FALSE} 123 {$setc TARGET_CPU_PPC64 := FALSE} 124 {$setc TARGET_CPU_X86 := FALSE} 125 {$setc TARGET_CPU_X86_64 := TRUE} 126 {$setc TARGET_CPU_ARM := FALSE} 127 {$setc TARGET_OS_MAC := TRUE} 128 {$setc TARGET_OS_IPHONE := FALSE} 129 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 130 {$setc TARGET_OS_EMBEDDED := FALSE} 131{$elifc defined __arm__ and __arm__} 132 {$setc TARGET_CPU_PPC := FALSE} 133 {$setc TARGET_CPU_PPC64 := FALSE} 134 {$setc TARGET_CPU_X86 := FALSE} 135 {$setc TARGET_CPU_X86_64 := FALSE} 136 {$setc TARGET_CPU_ARM := TRUE} 137 { will require compiler define when/if other Apple devices with ARM cpus ship } 138 {$setc TARGET_OS_MAC := FALSE} 139 {$setc TARGET_OS_IPHONE := TRUE} 140 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 141 {$setc TARGET_OS_EMBEDDED := TRUE} 142{$elsec} 143 {$error __ppc__ nor __ppc64__ nor __i386__ nor __x86_64__ nor __arm__ is defined.} 144{$endc} 145 146{$ifc defined __LP64__ and __LP64__ } 147 {$setc TARGET_CPU_64 := TRUE} 148{$elsec} 149 {$setc TARGET_CPU_64 := FALSE} 150{$endc} 151 152{$ifc defined FPC_BIG_ENDIAN} 153 {$setc TARGET_RT_BIG_ENDIAN := TRUE} 154 {$setc TARGET_RT_LITTLE_ENDIAN := FALSE} 155{$elifc defined FPC_LITTLE_ENDIAN} 156 {$setc TARGET_RT_BIG_ENDIAN := FALSE} 157 {$setc TARGET_RT_LITTLE_ENDIAN := TRUE} 158{$elsec} 159 {$error Neither FPC_BIG_ENDIAN nor FPC_LITTLE_ENDIAN are defined.} 160{$endc} 161{$setc ACCESSOR_CALLS_ARE_FUNCTIONS := TRUE} 162{$setc CALL_NOT_IN_CARBON := FALSE} 163{$setc OLDROUTINENAMES := FALSE} 164{$setc OPAQUE_TOOLBOX_STRUCTS := TRUE} 165{$setc OPAQUE_UPP_TYPES := TRUE} 166{$setc OTCARBONAPPLICATION := TRUE} 167{$setc OTKERNEL := FALSE} 168{$setc PM_USE_SESSION_APIS := TRUE} 169{$setc TARGET_API_MAC_CARBON := TRUE} 170{$setc TARGET_API_MAC_OS8 := FALSE} 171{$setc TARGET_API_MAC_OSX := TRUE} 172{$setc TARGET_CARBON := TRUE} 173{$setc TARGET_CPU_68K := FALSE} 174{$setc TARGET_CPU_MIPS := FALSE} 175{$setc TARGET_CPU_SPARC := FALSE} 176{$setc TARGET_OS_UNIX := FALSE} 177{$setc TARGET_OS_WIN32 := FALSE} 178{$setc TARGET_RT_MAC_68881 := FALSE} 179{$setc TARGET_RT_MAC_CFM := FALSE} 180{$setc TARGET_RT_MAC_MACHO := TRUE} 181{$setc TYPED_FUNCTION_POINTERS := TRUE} 182{$setc TYPE_BOOL := FALSE} 183{$setc TYPE_EXTENDED := FALSE} 184{$setc TYPE_LONGLONG := TRUE} 185uses MacTypes,AERegistry,AEDataModel,OSA; 186{$endc} {not MACOSALLINCLUDE} 187 188 189{$ifc TARGET_OS_MAC} 190 191{$ALIGN POWER} 192 193 194{ 195 ////////////////////////////////////// 196 Finder Suite 197 ////////////////////////////////////// 198} 199 200{ 201 The old Finder Event suite was 'FNDR' 202 The new suite is 'fndr' 203} 204const 205 kAEFinderSuite = FourCharCode('fndr'); 206 207{ 208 ////////////////////////////////////// 209 Finder Events 210 ////////////////////////////////////// 211} 212const 213 kAECleanUp = FourCharCode('fclu'); 214 kAEEject = FourCharCode('ejct'); 215 kAEEmpty = FourCharCode('empt'); 216 kAEErase = FourCharCode('fera'); 217 kAEGestalt = FourCharCode('gstl'); 218 kAEPutAway = FourCharCode('ptwy'); 219 kAERebuildDesktopDB = FourCharCode('rddb'); 220 kAESync = FourCharCode('fupd'); 221 kAEInterceptOpen = FourCharCode('fopn'); 222 223{ "Sort" from the database suite:} 224const 225 kAEDatabaseSuite = FourCharCode('DATA'); 226 kAESort = FourCharCode('SORT'); 227 228{ 229 //////////////////////////////////////////////////////////////////////// 230 Classes 231 Note: all classes are defined up front so that the property definitions 232 can reference classes. 233 //////////////////////////////////////////////////////////////////////// 234} 235 236const 237 cInternalFinderObject = FourCharCode('obj '); { cReference - used to distinguish objects used inside the Finder only} 238 239{ 240 Main Finder class definitions 241 Indentation implies object model hierarchy 242} 243const 244{ We do not use class cItem from AERegistry.r. Instead our class Item is a cObject} 245 { cItem = 'citm', // defined in AERegistry.r} 246 { cFile = 'file', // defined in AERegistry.r} 247 cAliasFile = FourCharCode('alia'); 248 cApplicationFile = FourCharCode('appf'); 249 cControlPanelFile = FourCharCode('ccdv'); 250 cDeskAccessoryFile = FourCharCode('dafi'); 251 cDocumentFile = FourCharCode('docf'); 252 cFontFile = FourCharCode('fntf'); 253 cSoundFile = FourCharCode('sndf'); 254 cClippingFile = FourCharCode('clpf'); 255 cContainer = FourCharCode('ctnr'); 256 cDesktop = FourCharCode('cdsk'); 257 cSharableContainer = FourCharCode('sctr'); 258 cDisk = FourCharCode('cdis'); 259 cFolder = FourCharCode('cfol'); 260 cSuitcase = FourCharCode('stcs'); 261 cAccessorySuitcase = FourCharCode('dsut'); 262 cFontSuitcase = FourCharCode('fsut'); 263 cTrash = FourCharCode('ctrs'); 264 cDesktopPrinter = FourCharCode('dskp'); 265 cPackage = FourCharCode('pack'); 266 cContentSpace = FourCharCode('dwnd'); { cWindow = 'cwin', // defined in AERegistry.r} 267 cContainerWindow = FourCharCode('cwnd'); 268 cInfoWindow = FourCharCode('iwnd'); 269 cSharingWindow = FourCharCode('swnd'); 270 cStatusWindow = FourCharCode('qwnd'); 271 cClippingWindow = FourCharCode('lwnd'); 272 cPreferencesWindow = FourCharCode('pwnd'); 273 cDTPWindow = FourCharCode('dtpw'); 274 cProcess = FourCharCode('prcs'); 275 cAccessoryProcess = FourCharCode('pcda'); 276 cApplicationProcess = FourCharCode('pcap'); 277 cGroup = FourCharCode('sgrp'); 278 cUser = FourCharCode('cuse'); { cApplication = 'capp', // defined in AERegistry.r} 279 cSharingPrivileges = FourCharCode('priv'); 280 cPreferences = FourCharCode('cprf'); 281 cLabel = FourCharCode('clbl'); 282 cSound = FourCharCode('snd '); 283 cAliasList = FourCharCode('alst'); 284 cSpecialFolders = FourCharCode('spfl'); { For use by viewer search engines:} 285 cOnlineDisk = FourCharCode('cods'); 286 cOnlineLocalDisk = FourCharCode('clds'); 287 cOnlineRemoteDisk = FourCharCode('crds'); { Miscellaneous class definitions} 288 cEntireContents = FourCharCode('ects'); 289 cIconFamily = FourCharCode('ifam'); 290 291 292{ 293 ////////////////////////////////////// 294 Properties 295 ////////////////////////////////////// 296} 297 298{ Properties of class cItem (really cObject)} 299const 300{ pBounds = 'pbnd', // defined in AERegistry.r} 301 pComment = FourCharCode('comt'); 302 pContainer = cContainer; 303 pContentSpace = cContentSpace; 304 pCreationDateOld = FourCharCode('crtd'); { to support pre-Finder 8 scripts} 305 pCreationDate = FourCharCode('ascd'); { from File Commands OSAX} 306 pDescription = FourCharCode('dscr'); 307 pDisk = cDisk; 308 pFolderOld = cFolder; { to support pre-Finder 8 scripts} 309 pFolder = FourCharCode('asdr'); { from File Commands OSAX} 310 pIconBitmap = FourCharCode('iimg'); { pID = 'ID ', // defined in AERegistry.r} 311 pInfoWindow = cInfoWindow; 312 pKind = FourCharCode('kind'); 313 pLabelIndex = FourCharCode('labi'); 314 pModificationDateOld = FourCharCode('modd'); { to support pre-Finder 8 scripts} 315 pModificationDate = FourCharCode('asmo'); { from File Commands OSAX} 316 { pName = 'pnam', // defined in AERegistry.r} 317 pPhysicalSize = FourCharCode('phys'); 318 pPosition = FourCharCode('posn'); 319 pIsSelected = FourCharCode('issl'); 320 pSize = pPointSize; { pPointSize defined in AERegistry.r} 321 pWindow = cWindow; 322 pPreferencesWindow = cPreferencesWindow; 323 324 325{ Properties of class cFile (subclass of cItem)} 326const 327 pFileCreator = FourCharCode('fcrt'); 328 pFileType = FourCharCode('asty'); { from File Commands OSAX} 329 pFileTypeOld = FourCharCode('fitp'); { to support pre-Finder 8 scripts} 330 pIsLocked = FourCharCode('aslk'); { from File Commands OSAX} 331 pIsLockedOld = FourCharCode('islk'); { to support pre-Finder 8 scripts} 332 { pIsStationeryPad = 'pspd', // defined in AERegistry.r } 333 { pVersion = 'vers', // defined in AERegistry.r} 334 pProductVersion = FourCharCode('ver2'); 335 336 337{ Properties of class cAliasFile (subclass of cFile)} 338const 339 pOriginalItem = FourCharCode('orig'); 340 341{ Properties of class cApplicationFile (subclass of cFile)} 342const 343 pMinAppPartition = FourCharCode('mprt'); 344 pAppPartition = FourCharCode('appt'); 345 pSuggestedAppPartition = FourCharCode('sprt'); 346 pIsScriptable = FourCharCode('isab'); 347 348{ Properties of class cURLFile (subclass of cFile)} 349const 350 pInternetLocation = FourCharCode('iloc'); 351 352{ Properties of class cSoundFile (subclass of cFile)} 353const 354 pSound = FourCharCode('snd '); 355 356 357{ 358 Properties of class cControlPanel (Views CP only) (subclass of cFile) 359 Note: the other view-like preference settings are not available in the Views 360 control panel. These properties are only offered here for backward compatability. 361 To set the full range of Finder Preferences, use the Preferences object. 362} 363const 364 pShowFolderSize = FourCharCode('sfsz'); { Moved to a per-folder basis in Finder 8.0 HIS} 365 pShowComment = FourCharCode('scom'); { Moved to a per-folder basis in Finder 8.0 HIS} 366 pShowDate = FourCharCode('sdat'); { Moved to a per-folder basis in Finder 8.0 HIS} 367 pShowCreationDate = FourCharCode('scda'); { Moved to a per-folder basis in Finder 8.0 HIS} 368 pShowKind = FourCharCode('sknd'); { Moved to a per-folder basis in Finder 8.0 HIS} 369 pShowLabel = FourCharCode('slbl'); { Moved to a per-folder basis in Finder 8.0 HIS} 370 pShowSize = FourCharCode('ssiz'); { Moved to a per-folder basis in Finder 8.0 HIS} 371 pShowVersion = FourCharCode('svrs'); { Moved to a per-folder basis in Finder 8.0 HIS} 372 pSortDirection = FourCharCode('sord'); 373 pShowDiskInfo = FourCharCode('sdin'); { Always on in Finder 8.0 HIS} 374 pListViewIconSize = FourCharCode('lvis'); { Moved to a per-folder basis in Finder 8.0 HIS} 375 pGridIcons = FourCharCode('fgrd'); { Moved to a per-folder basis in Finder 8.0 HIS} 376 pStaggerIcons = FourCharCode('fstg'); { No longer part of the Finder 8.0 HIS} 377 pViewFont = FourCharCode('vfnt'); 378 pViewFontSize = FourCharCode('vfsz'); 379 380{ Properties of class cContainer (subclass of cItem)} 381const 382 pCompletelyExpanded = FourCharCode('pexc'); 383 pContainerWindow = cContainerWindow; 384 pEntireContents = cEntireContents; 385 pExpandable = FourCharCode('pexa'); 386 pExpanded = FourCharCode('pexp'); 387 pPreviousView = FourCharCode('svew'); { pSelection = 'sele', // defined in AERegistry.r} 388 pView = FourCharCode('pvew'); 389 pIconSize = pListViewIconSize; { defined above} 390 pKeepArranged = FourCharCode('arrg'); { OBSOLETE in Finder 9 or later} 391 pKeepArrangedBy = FourCharCode('arby'); { OBSOLETE in Finder 9 or later} 392 393{ Properties of class cDesktop (subclass of cContainer)} 394const 395 pStartupDisk = FourCharCode('sdsk'); 396 pTrash = FourCharCode('trsh'); 397 398{ Properties of class cSharableContainer (subclass of cContainer)} 399const 400 pOwner = FourCharCode('sown'); 401 pOwnerPrivileges = FourCharCode('ownr'); 402 pGroup = cGroup; 403 pGroupPrivileges = FourCharCode('gppr'); 404 pGuestPrivileges = FourCharCode('gstp'); 405 pArePrivilegesInherited = FourCharCode('iprv'); 406 pExported = FourCharCode('sexp'); 407 pMounted = FourCharCode('smou'); 408 pSharingProtection = FourCharCode('spro'); 409 pSharing = FourCharCode('shar'); 410 pSharingWindow = cSharingWindow; 411 412{ Properties of class cDisk (subclass of cSharableContainer)} 413const 414 pCapacity = FourCharCode('capa'); 415 pEjectable = FourCharCode('isej'); 416 pFreeSpace = FourCharCode('frsp'); 417 pLocal = FourCharCode('isrv'); 418 pIsStartup = FourCharCode('istd'); 419 420{ Properties of class cTrash (subclass of cSharableContainer)} 421const 422 pWarnOnEmpty = FourCharCode('warn'); 423 424{ Properties of class cWindow (subclass of cContentSpace)} 425const 426{ pBounds = 'pbnd', // defined in AERegistry.r} 427 { pHasCloseBox = 'hclb', // defined in AERegistry.r} 428 { pIsFloating = 'isfl', // defined in AERegistry.r} 429 { pIndex = 'pidx', // defined in AERegistry.r} 430 { pIsModal = 'pmod', // defined in AERegistry.r} 431 { pPosition = 'posn', // defined above} 432 { pIsResizable = 'prsz', // defined in AERegistry.r} 433 { pHasTitleBar = 'ptit', // defined in AERegistry.r} 434 { pVisible = 'pvis', // defined in AERegistry.r} 435 { pIsZoomable = 'iszm', // defined in AERegistry.r} 436 { pIsZoomed = 'pzum', // defined in AERegistry.r} 437 pIsZoomedFull = FourCharCode('zumf'); 438 pIsPopup = FourCharCode('drwr'); 439 pIsPulledOpen = FourCharCode('pull'); { only applies to popup windows} 440 pIsCollapsed = FourCharCode('wshd'); { only applies to normal windows} 441 442{ Properties of class cContainerWindow (subclass of cWindow)} 443const 444 pObject = cObject; 445 446{ Properties of class cSharingWindow (subclass of cWindow)} 447const 448 pSharableContainer = cSharableContainer; 449 450{ Properties of class cInfoWindow (subclass of cWindow)} 451const 452 pInfoPanel = FourCharCode('panl'); 453 454 455{ Properties of networking support} 456const 457 pFileShareOn = FourCharCode('fshr'); 458 pFileShareStartingUp = FourCharCode('fsup'); 459 pProgramLinkingOn = FourCharCode('iac '); 460 461{ Properties of class cPreferencesWindow (subclass of cWindow)} 462const 463{ pShowFolderSize = 'sfsz', // defined above for Views CP} 464 { pShowComment = 'scom', // defined above for Views CP} 465 pShowModificationDate = pShowDate; { pShowDate defined above for Views CP} 466 { pShowKind = 'sknd', // defined above for Views CP} 467 { pShowLabel = 'slbl', // defined above for Views CP} 468 { pShowSize = 'ssiz', // defined above for Views CP} 469 { pShowVersion = 'svrs', // defined above for Views CP} 470 { pShowCreationDate = 'scda', // Removed from Finder 8.0 HIS} 471 { pShowFileType = 'sfty', // Removed from Finder 8.0 HIS} 472 { pShowFileCreator = 'sfcr', // Removed from Finder 8.0 HIS} 473 { pListViewIconSize = 'lvis', // defined above for Views CP} 474 { pGridIcons = 'fgrd', // defined above for Views CP} 475 { pStaggerIcons = 'fstg', // defined above for Views CP} 476 { pViewFont = 'vfnt', // defined above for Views CP} 477 { pViewFontSize = 'vfsz', // defined above for Views CP} 478 pUseRelativeDate = FourCharCode('urdt'); { Moved to a per-folder basis in Finder 8.0 HIS} 479 pDelayBeforeSpringing = FourCharCode('dela'); 480 pSpringOpenFolders = FourCharCode('sprg'); 481 pUseShortMenus = FourCharCode('usme'); 482 pUseWideGrid = FourCharCode('uswg'); 483 pLabel1 = FourCharCode('lbl1'); 484 pLabel2 = FourCharCode('lbl2'); 485 pLabel3 = FourCharCode('lbl3'); 486 pLabel4 = FourCharCode('lbl4'); 487 pLabel5 = FourCharCode('lbl5'); 488 pLabel6 = FourCharCode('lbl6'); 489 pLabel7 = FourCharCode('lbl7'); 490 pDefaultIconViewIconSize = FourCharCode('iisz'); 491 pDefaultButtonViewIconSize = FourCharCode('bisz'); 492 pDefaultListViewIconSize = FourCharCode('lisz'); { old use of this name is now pIconSize} 493 pIconViewArrangement = FourCharCode('iarr'); 494 pButtonViewArrangement = FourCharCode('barr'); 495 496{ 497 The next bunch are the various arrangements that make up 498 enumArrangement 499} 500const 501 pNoArrangement = FourCharCode('narr'); 502 pSnapToGridArrangement = FourCharCode('grda'); 503 pByNameArrangement = FourCharCode('nama'); 504 pByModificationDateArrangement = FourCharCode('mdta'); 505 pByCreationDateArrangement = FourCharCode('cdta'); 506 pBySizeArrangement = FourCharCode('siza'); 507 pByKindArrangement = FourCharCode('kina'); 508 pByLabelArrangement = FourCharCode('laba'); 509 510{ #define pObject cObject // defined above} 511 512{ Properties of class cProcess (subclass of cObject)} 513const 514{ pName = 'pnam', // defined in AERegistry.r} 515 pFile = cFile; { pCreatorType = 'fcrt', // defined above} 516 { pFileType = 'asty', // defined above} 517 { pIsFrontProcess = 'pisf', // defined in AERegistry.r} 518 { pAppPartition = 'appt', // defined above} 519 pPartitionSpaceUsed = FourCharCode('pusd'); { pIsScriptable = 'isab', // defined in AERegistry.r} 520 { pVisible = 'pvis' // defined in AERegistry.r} 521 pLocalAndRemoteEvents = FourCharCode('revt'); 522 pHasScriptingTerminology = FourCharCode('hscr'); 523 524{ Properties of class cAccessoryProcess (subclass of cProcess)} 525const 526 pDeskAccessoryFile = cDeskAccessoryFile; 527 528{ Properties of class cApplicationProcess (subclass of cProcess)} 529const 530 pApplicationFile = cApplicationFile; 531 532{ 533 Properties of class cGroup (subclass of cObject) 534 enum ( 535 pBounds 536 pIconBitmap 537 pLabelIndex 538 pName 539 pPosition 540 pWindow = cWindow // defined above 541 ); 542} 543 544{ Properties of class cUser (subclass of cObject)} 545const 546{ pBounds} 547 { pIconBitmap} 548 { pLabelIndex} 549 { pName} 550 { pPosition} 551 { pWindow = cWindow, // defined above} 552 pCanConnect = FourCharCode('ccon'); 553 pCanChangePassword = FourCharCode('ccpw'); 554 pCanDoProgramLinking = FourCharCode('ciac'); 555 pIsOwner = FourCharCode('isow'); 556 pARADialIn = FourCharCode('arad'); 557 pShouldCallBack = FourCharCode('calb'); 558 pCallBackNumber = FourCharCode('cbnm'); 559 560{ 561 Properties of class cApplication (subclass of cObject) 562 NOTE: properties for the special folders must match their respective kXXXFolderType constants 563} 564const 565 pAboutMacintosh = FourCharCode('abbx'); 566 pAppleMenuItemsFolder = FourCharCode('amnu'); { kAppleMenuFolderType} 567 { pClipboard = 'pcli', // defined in AERegistry.r} 568 pControlPanelsFolder = FourCharCode('ctrl'); { kControlPanelFolderType} 569 pDesktop = FourCharCode('desk'); { kDesktopFolderType} 570 pExtensionsFolder = FourCharCode('extn'); { kExtensionFolderType} 571 { pFileShareOn = 'fshr', // defined above} 572 pFinderPreferences = FourCharCode('pfrp'); 573 pFontsFolder = FourCharCode('font'); 574 pFontsFolderPreAllegro = FourCharCode('ffnt'); { DO NOT USE THIS - FOR BACKWARDS COMPAT ONLY} 575 { pIsFrontProcess = 'pisf', // defined in AERegistry.r} 576 { pInsertionLoc = 'pins', // defined in AERegistry.r} 577 pLargestFreeBlock = FourCharCode('mfre'); 578 pPreferencesFolder = FourCharCode('pref'); { kPreferencesFolderType} 579 { pProductVersion = 'ver2', // defined above} 580 { pUserSelection = 'pusl', // defined in AERegistry.r} 581 { pFileShareStartingUp = 'fsup', // defined above} 582 pShortCuts = FourCharCode('scut'); 583 pShutdownFolder = FourCharCode('shdf'); 584 pStartupItemsFolder = FourCharCode('strt'); { kStartupFolderType} 585 pSystemFolder = FourCharCode('macs'); { kSystemFolderType} 586 pTemporaryFolder = FourCharCode('temp'); { kTemporaryFolderType} 587 { pVersion = 'vers', // defined in AERegistry.r} 588 pViewPreferences = FourCharCode('pvwp'); { pVisible = 'pvis', // defined in AERegistry.r} 589 pStartingUp = FourCharCode('awak'); { private property to tell whether the Finder is fully up and running} 590 591{ Properties of class cSharingPrivileges (subclass of cObject)} 592const 593 pSeeFiles = FourCharCode('prvr'); 594 pSeeFolders = FourCharCode('prvs'); 595 pMakeChanges = FourCharCode('prvw'); 596 597{ 598 Properties of class cPreferences (subclass of cObject) 599 enum ( 600 pShowFolderSize = 'sfsz', // defined above for Views CP 601 pShowComment = 'scom', // defined above for Views CP 602 pShowModificationDate = pShowDate, // pShowDate defined above for Views CP 603 pShowKind = 'sknd', // defined above for Views CP 604 pShowLabel = 'slbl', // defined above for Views CP 605 pShowSize = 'ssiz', // defined above for Views CP 606 pShowVersion = 'svrs', // defined above for Views CP 607 pShowCreationDate = 'scda', // defined in cPreferencesWindow 608 pShowFileType = 'sfty', // defined in cPreferencesWindow 609 pShowFileCreator = 'sfcr', // defined in cPreferencesWindow 610 pListViewIconSize = 'lvis', // defined above for Views CP 611 pGridIcons = 'fgrd', // defined above for Views CP 612 pStaggerIcons = 'fstg', // defined above for Views CP 613 pViewFont = 'vfnt', // defined above for Views CP 614 pViewFontSize = 'vfsz', // defined above for Views CP 615 pUseRelativeDate = 'urdt', // defined in cPreferencesWindow 616 pDelayBeforeSpringing = 'dela', // defined in cPreferencesWindow 617 pShowMacOSFolder = 'sosf', // defined in cPreferencesWindow 618 pUseShortMenus = 'usme', // defined in cPreferencesWindow 619 pUseCustomNewMenu = 'ucnm', // defined in cPreferencesWindow 620 pShowDesktopInBackground = 'sdtb', // defined in cPreferencesWindow 621 pActivateDesktopOnClick = 'adtc', // defined in cPreferencesWindow 622 pLabel1 = 'lbl1', // defined in cPreferencesWindow 623 pLabel2 = 'lbl2', // defined in cPreferencesWindow 624 pLabel3 = 'lbl3', // defined in cPreferencesWindow 625 pLabel4 = 'lbl4', // defined in cPreferencesWindow 626 pLabel5 = 'lbl5', // defined in cPreferencesWindow 627 pLabel6 = 'lbl6', // defined in cPreferencesWindow 628 pLabel7 = 'lbl7', // defined in cPreferencesWindow 629 pWindow = cWindow // defined above 630 ); 631} 632 633{ 634 Properties of class cLabel (subclass of cObject) 635 enum ( 636 pName = 'pnam', // defined in AERegistry.r 637 pColor = 'colr', // defined in AERegistry.r 638 ); 639} 640 641{ Misc Properties} 642const 643 pSmallIcon = FourCharCode('smic'); 644 pSmallButton = FourCharCode('smbu'); 645 pLargeButton = FourCharCode('lgbu'); 646 pGrid = FourCharCode('grid'); 647 648{ 649 ////////////////////////////////////// 650 Enumerations defined by the Finder 651 ////////////////////////////////////// 652} 653 654const 655 enumViewBy = FourCharCode('vwby'); 656 enumGestalt = FourCharCode('gsen'); 657 enumConflicts = FourCharCode('cflc'); 658 enumExistingItems = FourCharCode('exsi'); 659 enumOlderItems = FourCharCode('oldr'); 660 661const 662 enumDate = FourCharCode('enda'); 663 enumAnyDate = FourCharCode('anyd'); 664 enumToday = FourCharCode('tday'); 665 enumYesterday = FourCharCode('yday'); 666 enumThisWeek = FourCharCode('twek'); 667 enumLastWeek = FourCharCode('lwek'); 668 enumThisMonth = FourCharCode('tmon'); 669 enumLastMonth = FourCharCode('lmon'); 670 enumThisYear = FourCharCode('tyer'); 671 enumLastYear = FourCharCode('lyer'); 672 enumBeforeDate = FourCharCode('bfdt'); 673 enumAfterDate = FourCharCode('afdt'); 674 enumBetweenDate = FourCharCode('btdt'); 675 enumOnDate = FourCharCode('ondt'); 676 677const 678 enumAllDocuments = FourCharCode('alld'); 679 enumFolders = FourCharCode('fold'); 680 enumAliases = FourCharCode('alia'); 681 enumStationery = FourCharCode('stat'); 682 683const 684 enumWhere = FourCharCode('wher'); 685 enumAllLocalDisks = FourCharCode('aldk'); 686 enumAllRemoteDisks = FourCharCode('ardk'); 687 enumAllDisks = FourCharCode('alld'); 688 enumAllOpenFolders = FourCharCode('aofo'); 689 690 691const 692 enumIconSize = FourCharCode('isiz'); 693 enumSmallIconSize = pSmallIcon; 694 enumMiniIconSize = FourCharCode('miic'); 695 enumLargeIconSize = FourCharCode('lgic'); 696 697const 698 enumSortDirection = FourCharCode('sodr'); 699 enumSortDirectionNormal = FourCharCode('snrm'); 700 enumSortDirectionReverse = FourCharCode('srvs'); 701 702const 703 enumArrangement = FourCharCode('earr'); 704 705{ Get Info Window panel enumeration} 706const 707 enumInfoWindowPanel = FourCharCode('ipnl'); 708 enumGeneralPanel = FourCharCode('gpnl'); 709 enumSharingPanel = FourCharCode('spnl'); 710 enumStatusNConfigPanel = FourCharCode('scnl'); 711 enumFontsPanel = FourCharCode('fpnl'); 712 enumMemoryPanel = FourCharCode('mpnl'); 713 714 715{ Preferences panel enumeration} 716const 717 enumPrefsWindowPanel = FourCharCode('pple'); 718 enumPrefsGeneralPanel = FourCharCode('pgnp'); 719 enumPrefsLabelPanel = FourCharCode('plbp'); 720 enumPrefsIconViewPanel = FourCharCode('pivp'); 721 enumPrefsButtonViewPanel = FourCharCode('pbvp'); 722 enumPrefsListViewPanel = FourCharCode('plvp'); 723 724{ 725 ////////////////////////////////////// 726 Types defined by the Finder 727 ////////////////////////////////////// 728} 729 730const 731 typeIconFamily = cIconFamily; { An AEList of typeIconAndMask, type8BitIcon, & c.} 732 typeIconAndMask = FourCharCode('ICN#'); 733 type8BitMask = FourCharCode('l8mk'); 734 type32BitIcon = FourCharCode('il32'); 735 type8BitIcon = FourCharCode('icl8'); 736 type4BitIcon = FourCharCode('icl4'); 737 typeSmallIconAndMask = FourCharCode('ics#'); 738 typeSmall8BitMask = FourCharCode('s8mk'); 739 typeSmall32BitIcon = FourCharCode('is32'); 740 typeSmall8BitIcon = FourCharCode('ics8'); 741 typeSmall4BitIcon = FourCharCode('ics4'); 742 typeRelativeTime = FourCharCode('rtim'); 743 typeConceptualTime = FourCharCode('timc'); 744 745{ 746 ////////////////////////////////////// 747 Keywords defined by the Finder 748 ////////////////////////////////////// 749} 750 751const 752 keyIconAndMask = FourCharCode('ICN#'); 753 key32BitIcon = FourCharCode('il32'); 754 key8BitIcon = FourCharCode('icl8'); 755 key4BitIcon = FourCharCode('icl4'); 756 key8BitMask = FourCharCode('l8mk'); 757 keySmallIconAndMask = FourCharCode('ics#'); 758 keySmall8BitIcon = FourCharCode('ics8'); 759 keySmall4BitIcon = FourCharCode('ics4'); 760 keySmall32BitIcon = FourCharCode('is32'); 761 keySmall8BitMask = FourCharCode('s8mk'); 762 keyMini1BitMask = FourCharCode('icm#'); 763 keyMini4BitIcon = FourCharCode('icm4'); 764 keyMini8BitIcon = FourCharCode('icm8'); 765 keyAEUsing = FourCharCode('usin'); 766 keyAEReplacing = FourCharCode('alrp'); 767 keyAENoAutoRouting = FourCharCode('rout'); 768 keyLocalPositionList = FourCharCode('mvpl'); 769 keyGlobalPositionList = FourCharCode('mvpg'); 770 keyRedirectedDocumentList = FourCharCode('fpdl'); 771 772{ 773 ////////////////////////////////////// 774 New prepositions used by the Finder 775 ////////////////////////////////////// 776} 777 778const 779 keyASPrepositionHas = FourCharCode('has '); 780 keyAll = FourCharCode('kyal'); 781 keyOldFinderItems = FourCharCode('fsel'); 782 783{ 784 ////////////////////////////////////// 785 New key forms used by the Finder 786 ////////////////////////////////////// 787} 788 789const 790 formAlias = typeAlias; 791 formCreator = pFileCreator; 792 793 794{ 795 ////////////////////////////////////// 796 Finder error codes 797 ////////////////////////////////////// 798} 799 800const 801 errFinderIsBusy = -15260; 802 errFinderWindowNotOpen = -15261; 803 errFinderCannotPutAway = -15262; 804 errFinderWindowMustBeIconView = -15263; { RequireWindowInIconView} 805 errFinderWindowMustBeListView = -15264; { RequireWindowInListView} 806 errFinderCantMoveToDestination = -15265; 807 errFinderCantMoveSource = -15266; 808 errFinderCantOverwrite = -15267; 809 errFinderIncestuousMove = -15268; { Could just use errFinderCantMoveSource} 810 errFinderCantMoveToAncestor = -15269; { Could also use errFinderCantMoveSource} 811 errFinderCantUseTrashedItems = -15270; 812 errFinderItemAlreadyInDest = -15271; { Move from folder A to folder A} 813 errFinderUnknownUser = -15272; { Includes unknown group} 814 errFinderSharePointsCantInherit = -15273; 815 errFinderWindowWrongType = -15274; 816 errFinderPropertyNowWindowBased = -15275; 817 errFinderAppFolderProtected = -15276; { used by General controls when folder protection is on} 818 errFinderSysFolderProtected = -15277; { used by General controls when folder protection is on} 819 errFinderBoundsWrong = -15278; 820 errAEValueOutOfRange = -15279; 821 errFinderPropertyDoesNotApply = -15280; 822 errFinderFileSharingMustBeOn = -15281; 823 errFinderMustBeActive = -15282; 824 errFinderVolumeNotFound = -15283; { more descriptive than what we get with nsvErr} 825 errFinderLockedItemsInTrash = -15284; { there are some locked items in the trash} 826 errFinderOnlyLockedItemsInTrash = -15285; { all the items (except folders) in the trash are locked} 827 errFinderProgramLinkingMustBeOn = -15286; 828 errFinderWindowMustBeButtonView = -15287; 829 errFinderBadPackageContents = -15288; { something is wrong within the package } 830 errFinderUnsupportedInsidePackages = -15289; { operation cannot be used on items within a package } 831 errFinderCorruptOpenFolderList = -15290; { was -15276 in Finder 8.6 and earlier, but that conflicted with General Controls} 832 errFinderNoInvisibleFiles = -15291; { was -15277 in Finder 8.6 and earlier, but that conflicted with General Controls} 833 errFinderCantDeleteImmediately = -15292; { cannot delete immediately via scripting} 834 errFinderLastReserved = -15379; 835 836{$endc} {TARGET_OS_MAC} 837{$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE} 838 839end. 840{$endc} {not MACOSALLINCLUDE}