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.