PageRenderTime 62ms CodeModel.GetById 20ms app.highlight 36ms RepoModel.GetById 0ms app.codeStats 0ms

/packages/univint/src/FinderRegistry.pas

https://github.com/slibre/freepascal
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}