home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1995 August / NEBULA.mdf / SourceCode / Palettes / Clocks / Inspectors.subproj / SoundWell.m < prev   
Encoding:
Text File  |  1992-12-08  |  2.9 KB  |  119 lines
  1. //------------------------------------------------------------------------------------------------
  2. //
  3. //    SoundWell
  4. //    
  5. //    Inherits From:    View
  6. //
  7. //    Declared In:    SoundWell.h
  8. //
  9. //    Disclaimer
  10. //
  11. //        You may freely copy, distribute and reuse this software and its
  12. //        associated documentation. I disclaim any warranty of any kind, 
  13. //        expressed or implied, as to its fitness for any particular use.
  14. //
  15. //------------------------------------------------------------------------------------------------
  16. #import "SoundWell.h"
  17.  
  18.  
  19. @implementation SoundWell
  20.  
  21. //------------------------------------------------------------------------------------------------
  22. //    Initialization and Freeing
  23. //------------------------------------------------------------------------------------------------
  24. - initFrame: (const NXRect*) frameRect
  25. { 
  26.     [super initFrame:frameRect];
  27.     [self setCell: [[ActionCell allocFromZone:[self zone]] init]];
  28.     [self registerForDraggedTypes:&NXFilenamePboardType count:1];
  29.     return self;
  30. }
  31.  
  32.  
  33. - free
  34. {
  35.     if (sound) [sound free];
  36.     return [super free];
  37. }
  38.  
  39.  
  40. //------------------------------------------------------------------------------------------------
  41. //    Accessing Image
  42. //------------------------------------------------------------------------------------------------
  43. - sound: aSound
  44. {
  45.     sound = aSound;
  46.     return self;
  47. }
  48.  
  49.  
  50. - sound
  51. {
  52.     return sound;
  53. }
  54.  
  55.  
  56. //------------------------------------------------------------------------------------------------
  57. //    Action Methods
  58. //------------------------------------------------------------------------------------------------
  59. - play: sender
  60. {
  61.     [sound play];
  62.     return self;
  63. }
  64.  
  65.  
  66. //------------------------------------------------------------------------------------------------
  67. //    Drawing
  68. //------------------------------------------------------------------------------------------------
  69. - drawSelf: (const NXRect *)rects :(int)count
  70. {
  71.     NXSetColor ([[self window] backgroundColor]);
  72.     NXRectFill (&bounds);
  73.     return self;
  74. }
  75.  
  76.  
  77. //------------------------------------------------------------------------------------------------
  78. //    Dragging
  79. //------------------------------------------------------------------------------------------------
  80. - (NXDragOperation) draggingEntered:dragSource
  81. {
  82.     return NX_DragOperationCopy;
  83. }
  84.  
  85.  
  86. - (BOOL) performDragOperation:dragSource
  87. {
  88.     char*    pathString;
  89.     char*    data;
  90.     int         length;
  91.     
  92.     id aPboard = [dragSource draggingPasteboard];
  93.     [aPboard readType:NXFilenamePboardType data:&data length:&length];
  94.  
  95.     if ((pathString = index (data, '\t'))) *pathString = '\0';
  96.  
  97.     if ((pathString = rindex (data, '.')))
  98.         if (NXOrderStrings (pathString + 1, "snd", YES, -1, NULL) == 0)
  99.             {
  100.             sound = [[Sound allocFromZone: [self zone]] initFromSoundfile: data];
  101.             [sound play];
  102.             [aPboard deallocatePasteboardData:data length:length];
  103.             return YES;
  104.             }
  105.             
  106.     [aPboard deallocatePasteboardData:data length:length];
  107.     return NO;
  108. }
  109.  
  110.  
  111. - concludeDragOperation:dragSource
  112. {
  113.     [[self target] perform:[self action] with:self];
  114.     return self;
  115. }
  116.  
  117.  
  118.  
  119. @end