This is CircularSlider.m in view mode; [Download] [Up]
/* * Filename: CircularSlider.m * Created : Sat 24 21:25:44 1991 * Author : Vince DeMarco <vince@whatnxt.cuc.ab.ca> * LastEditDate Was "Mon Sep 6 16:32:15 1993" * * Version 2.0 */ /* Generated by Interface Builder */ #import "CircularSlider.h" #import "CircularSliderCell.h" static id myStoredCellClass; @implementation CircularSlider + initialize { /* Class initialization code. */ myStoredCellClass = [CircularSliderCell class]; // The default class return self; } + setCellClass:classId { myStoredCellClass = classId; return self; } - initFrame:(NXRect *)nf { [super initFrame:nf]; [[self setCell:[[myStoredCellClass alloc] init]] free]; /* Freeze old Cell Class */ return self; } - setEnabled:(BOOL)aBOOL { [cell setEnabled:aBOOL]; [self display]; return self; } - setBezeled:(BOOL)value { [cell setBezeled:value]; [self display]; return self; } - (BOOL)isBezeled { return [cell isBezeled]; } - setBordered:(BOOL)value { [cell setBordered:value]; [self display]; return self; } - (BOOL)isBordered { return [cell isBordered]; } - setDrawAsPieChart:(BOOL)aBOOL { [cell setDrawAsPieChart:aBOOL]; [self display]; return self; } - (BOOL)drawAsPieChart { return (BOOL)[cell drawAsPieChart]; } - (float)floatValue { return (float)[cell floatValue]; } - (double)doubleValue { return (double)[cell doubleValue]; } - (int)intValue { return (int)[cell intValue]; } - setDoubleValue:(double)value { [cell setDoubleValue:value]; [self display]; return self; } - setFloatValue:(float)value { [cell setFloatValue:value]; [self display]; return self; } - setIntValue:(int)value { [cell setIntValue:value]; [self display]; return self; } - (float)minValue { return (float)[cell minValue]; } - setMinValue:(float)value { [cell setMinValue:value]; [self display]; return self; } - (float)maxValue { return (float)[cell maxValue]; } - setMaxValue:(float)value { [cell setMaxValue:value]; [self display]; return self; } - setJumpToMousePoint:(BOOL)aBOOL { [cell setJumpToMousePoint:aBOOL]; return self; } - (BOOL)jumpToMousePoint { return [cell jumpToMousePoint]; } - setHidden:(BOOL)aBOOL { [cell setHidden:aBOOL]; [self display]; return self; } - (BOOL)hidden { return (BOOL)[cell hidden]; } - (const char*)getInspectorClassName { return "CircularSliderInspector"; } @end
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.