home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / C / Applications / MacPerl 5.1.3 / Mac_Perl_513_src / MacPerl5 / MPAEUtils.h < prev    next >
Encoding:
C/C++ Source or Header  |  1995-12-17  |  1.7 KB  |  63 lines  |  [TEXT/MPS ]
  1. /*********************************************************************
  2. Project    :    MacPerl            -    Real Perl Application
  3. File        :    MPAEUtils.h        -
  4. Author    :    Matthias Neeracher
  5.  
  6. A lot of this code is borrowed from 7Edit written by
  7. Apple Developer Support UK
  8.  
  9. Language    :    MPW C
  10.  
  11. $Log: MPAEUtils.h,v $
  12. Revision 1.1  1994/02/27  23:02:37  neeri
  13. Initial revision
  14.  
  15. Revision 0.1  1993/05/29  00:00:00  neeri
  16. Compiles correctly
  17.  
  18. *********************************************************************/
  19.  
  20.  
  21. #include <Types.h>
  22. #include <QuickDraw.h>
  23. #include <Packages.h>
  24. #include <GestaltEqu.h>
  25. #ifdef EVIL_USELESS_EDITIONS
  26. #include <Editions.h>
  27. #endif
  28. #include <Printing.h>
  29. #include <AppleEvents.h>
  30. #include <ToolUtils.h>
  31.  
  32. #ifndef __MPAEUTILS__
  33. #define __MPAEUTILS__
  34.  
  35. /**-----------------------------------------------------------------------
  36.     Utility Routines for getting data from AEDesc's
  37.   -----------------------------------------------------------------------**/
  38.  
  39. pascal void GetRawDataFromDescriptor(    const AEDesc *theDesc,
  40.                                                     Ptr     destPtr,
  41.                                                     Size    destMaxSize,
  42.                                                     Size    *actSize);
  43.  
  44. pascal OSErr GetPStringFromDescriptor(    const AEDesc *sourceDesc, char *resultStr);
  45.  
  46. pascal OSErr GetIntegerFromDescriptor(    const AEDesc *sourceDesc, short *result);
  47.  
  48. pascal OSErr GetBooleanFromDescriptor(    const AEDesc *sourceDesc,
  49.                                                     Boolean *result);
  50.  
  51. pascal OSErr GetLongIntFromDescriptor(    const AEDesc *sourceDesc,
  52.                                           long   *result);
  53.  
  54. pascal OSErr GetRectFromDescriptor(        const AEDesc *sourceDesc, Rect *result);
  55.  
  56. pascal OSErr GetPointFromDescriptor(    const AEDesc *sourceDesc,
  57.                                                     Point  *result);
  58.  
  59. pascal OSErr GetTextFromDescIntoTEHandle(
  60.                                                     const AEDesc *sourceTextDesc,
  61.                                                     TEHandle theHTE);
  62.  
  63. #endif