Return to MySlider.m CVS log

Up to [NeXTSTEP 3.3 examples] / Examples / AppKit / Backspace

Annotation of Examples/AppKit/Backspace/MySlider.m, revision 1.1.1.1

1.1       root        1: //  MySlider.m
                      2: //
                      3: //  a simple slider subclass that lets me save the sliders value after
                      4: //  the mouse comes up.
                      5: //
                      6: //  You may freely copy, distribute, and reuse the code in this example.
                      7: //  NeXT disclaims any warranty of any kind, expressed or  implied, as to its
                      8: //  fitness for any particular use.
                      9: 
                     10: 
                     11: #import "MySlider.h"
                     12: #import "Thinker.h"
                     13: 
                     14: @implementation MySlider
                     15: 
                     16: - mouseDown:(NXEvent *)theEvent
                     17: {
                     18:        [super mouseDown:theEvent];
                     19:        [[self target] saveSliderValue];
                     20:        return self;
                     21: }
                     22: 
                     23: @end

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