ftp.nice.ch/pub/next/developer/resources/classes/UHInspector.1.2.N.bs.tar.gz#/UHInspector_1.2/InspectorDemo/ClipperInspector.m

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

#import "ClipperInspector.h"

@implementation ClipperInspector
 
- doRevert:sender
{
	[upperSlider setDoubleValue:[object upperLimit]];
	[upperText setDoubleValue:[object upperLimit]];
	[lowerSlider setDoubleValue:[object lowerLimit]];
	[lowerText setDoubleValue:[object lowerLimit]];

	return self;
}



- doOk:sender
{
	if(sender==upperSlider){
		[object setUpperLimit:[upperSlider doubleValue]];
		[upperText setDoubleValue:[upperSlider doubleValue]];
	}
	if(sender==upperText){
		[object setUpperLimit:[upperText doubleValue]];
		[upperSlider setDoubleValue:[upperText doubleValue]];
	}
	if(sender==lowerSlider){
		[object setLowerLimit:[lowerSlider doubleValue]];
		[lowerText setDoubleValue:[lowerSlider doubleValue]];
	}
	if(sender==lowerText){
		[object setLowerLimit:[lowerText doubleValue]];
		[lowerSlider setDoubleValue:[lowerText doubleValue]];
	}
	return self;
}

	
@end

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