ftp.nice.ch/Attic/openStep/implementation/gnustep/sources/objcX-0.87.tgz#/objcX-0.87/examples/ScrollView/Controller.m

This is Controller.m in view mode; [Download] [Up]

#import "Controller.h"

#import <appkit/Scroller.h>
#import <appkit/ScrollView.h>
#import <appkit/Form.h>

@implementation Controller

- fetchValues:sender
{
    Scroller	*scroller;
    float	pos, percent;
    
    scroller = [scrollView vertScroller];
    pos = [scroller floatValue];
    [form setFloatValue:pos at:0];
    return self;
}


@end

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.