Return to ScrollingSound.m CVS log

Up to [NeXTSTEP 3.3 examples] / Examples / SoundAndMusic / SoundKit / SoundEditor

Annotation of Examples/SoundAndMusic/SoundKit/SoundEditor/ScrollingSound.m, revision 1.1.1.1

1.1       root        1: /*
                      2:  * You may freely copy, distribute and reuse the code in this example.  
                      3:  * NeXT disclaims any warranty of any kind, expressed or implied, as to 
                      4:  * its fitness for any particular use.
                      5:  */
                      6: 
                      7: 
                      8: #import "ScrollingSound.h"
                      9: #import <soundkit/soundkit.h>
                     10: 
                     11: @implementation ScrollingSound
                     12: 
                     13: - initFrame:(NXRect const *)theFrame
                     14: {
                     15:     NXRect tempRect = *theFrame;
                     16:     id theSoundView;
                     17:     int borderType = NX_NOBORDER;
                     18:     
                     19:     [ScrollView getContentSize:&tempRect.size forFrameSize:&theFrame->size
                     20:                horizScroller:YES vertScroller:NO borderType:borderType];
                     21:     theSoundView = [[SoundView alloc] initFrame:&tempRect];
                     22:     [theSoundView setReductionFactor:32.0];
                     23:     [super initFrame:theFrame];
                     24:     [self setBorderType:borderType];
                     25:     [self setHorizScrollerRequired:YES];
                     26:     [self setDynamicScrolling:YES];
                     27:     [self setDocView:theSoundView];
                     28:     [self setBackgroundGray:NX_WHITE];
                     29:     [self setAutoresizeSubviews:YES];
                     30:     [self setAutosizing:NX_WIDTHSIZABLE|NX_HEIGHTSIZABLE];
                     31:     [[theSoundView superview] setAutoresizeSubviews:YES];
                     32:     [theSoundView setAutosizing:NX_HEIGHTSIZABLE];
                     33:     return self;
                     34: }
                     35: 
                     36: - play:sender {return [[self docView] play:sender];}
                     37: - stop:sender {return [[self docView] stop:sender];}
                     38: - record:sender {return [[self docView] record:sender];}
                     39: 
                     40: 
                     41: @end
                     42: 
                     43: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.