home *** CD-ROM | disk | FTP | other *** search
/ QuickTime 2.0 Developer Kit / QuickTime 2.0 Developer Kit.iso / mac / MAC / Programming Stuff / Interfaces / PInterfaces / Finder.p < prev    next >
Encoding:
Text File  |  1994-11-11  |  2.2 KB  |  86 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        Finder.p
  3.  
  4.      Copyright:    © 1984-1994 by Apple Computer, Inc.
  5.                  All rights reserved.
  6.  
  7.      Version:    Universal Interfaces 2.0a3  ETO #16, MPW prerelease.  Friday, November 11, 1994. 
  8.  
  9.      Bugs?:        If you find a problem with this file, send the file and version
  10.                  information (from above) and the problem description to:
  11.  
  12.                      Internet:    apple.bugs@applelink.apple.com
  13.                      AppleLink:    APPLE.BUGS
  14.  
  15. }
  16.  
  17. {$IFC UNDEFINED UsingIncludes}
  18. {$SETC UsingIncludes := 0}
  19. {$ENDC}
  20.  
  21. {$IFC NOT UsingIncludes}
  22.  UNIT Finder;
  23.  INTERFACE
  24. {$ENDC}
  25.  
  26. {$IFC UNDEFINED __FINDER__}
  27. {$SETC __FINDER__ := 1}
  28.  
  29. {$I+}
  30. {$SETC FinderIncludes := UsingIncludes}
  31. {$SETC UsingIncludes := 1}
  32.  
  33.  
  34. {$PUSH}
  35. {$ALIGN MAC68K}
  36. {$LibExport+}
  37.  
  38. CONST
  39. { Make only the following consts avaiable to resource files that include this file }
  40.     kCustomIconResource            = -16455;                        { Custom icon family resource ID }
  41.     kContainerFolderAliasType    = 'fdrp';                        { type for folder aliases }
  42.     kContainerTrashAliasType    = 'trsh';                        { type for trash folder aliases }
  43.     kContainerHardDiskAliasType    = 'hdsk';                        { type for hard disk aliases }
  44.     kContainerFloppyAliasType    = 'flpy';                        { type for floppy aliases }
  45.     kContainerServerAliasType    = 'srvr';                        { type for server aliases }
  46.     kApplicationAliasType        = 'adrp';                        { type for application aliases }
  47.     kContainerAliasType            = 'drop';                        { type for all other containers }
  48. { types for Special folder aliases }
  49.     kSystemFolderAliasType        = 'fasy';
  50.     kAppleMenuFolderAliasType    = 'faam';
  51.     kStartupFolderAliasType        = 'fast';
  52.     kPrintMonitorDocsFolderAliasType = 'fapn';
  53.     kPreferencesFolderAliasType    = 'fapf';
  54.     kControlPanelFolderAliasType = 'fact';
  55.     kExtensionFolderAliasType    = 'faex';
  56. { types for AppleShare folder aliases }
  57.     kExportedFolderAliasType    = 'faet';
  58.     kDropFolderAliasType        = 'fadr';
  59.     kSharedFolderAliasType        = 'fash';
  60.     kMountedFolderAliasType        = 'famn';
  61.  
  62. { Finder Flags }
  63.     kIsOnDesk                    = $1;
  64.     kColor                        = $E;
  65.     kIsShared                    = $40;
  66.     kHasBeenInited                = $100;
  67.     kHasCustomIcon                = $400;
  68.     kIsStationery                = $800;
  69.     kIsStationary                = $800;
  70.     kNameLocked                    = $1000;
  71.     kHasBundle                    = $2000;
  72.     kIsInvisible                = $4000;
  73.     kIsAlias                    = $8000;
  74.  
  75.  
  76. {$ALIGN RESET}
  77. {$POP}
  78.  
  79. {$SETC UsingIncludes := FinderIncludes}
  80.  
  81. {$ENDC} {__FINDER__}
  82.  
  83. {$IFC NOT UsingIncludes}
  84.  END.
  85. {$ENDC}
  86.