This is ContourSeriesPane.m in view mode; [Download] [Up]
/*
* Copyright (C) 1993 Robert Davis
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of Version 2, or any later version, of
* the GNU General Public License as published by the Free Software
* Foundation.
*/
static char RCSId[]="$Id: ContourSeriesPane.m,v 1.2 1993/05/04 16:21:27 davis Exp $";
#import <appkit/Application.h>
#import <appkit/Form.h>
#import <appkit/FormCell.h>
#import "ContourSeriesPane.h"
#import "Status.h"
#import "StatusContour.h"
@implementation ContourSeriesPane
- init
{
[super init];
[NXApp loadNibSection: "ContourSeriesPane.nib"
owner: self
withNames: NO
fromZone: [self zone]];
return self;
}
- (BOOL)updateStatus:aStatus doc:aDoc
{
BOOL enabled;
[super updateStatus:aStatus doc:aDoc];
if (status) {
[startField setDoubleValue:[status contourLevelsStart]];
[incrField setDoubleValue:[status contourLevelsIncr]];
[endField setDoubleValue:[status contourLevelsEnd]];
[levelsFormCell setIntValue:[status contourLevels]];
}
enabled = [doc isEnabled]; /* doc is ContourOptionsPanel*/
[levelsForm setEnabled:enabled];
[seriesMatrix setEnabled:enabled];
return NO;
}
- selectControl:sender
{
[seriesMatrix selectText:self];
return self;
}
- setStart:sender
{
[status setContourLevelsStart:[sender doubleValue]];
[self forceUpdateStatus:status doc:doc]; /* This may change levels */
return self;
}
- setIncr:sender
{
[status setContourLevelsIncr:[sender doubleValue]];
[self forceUpdateStatus:status doc:doc]; /* This may change levels */
return self;
}
- setEnd:sender
{
[status setContourLevelsEnd:[sender doubleValue]];
[self forceUpdateStatus:status doc:doc]; /* This may change levels */
return self;
}
- setLevels:sender
{
[status setContourLevels:[sender intValue]];
[self forceUpdateStatus:status doc:doc]; /* This may change series */
return self;
}
// Shuts up the compiler about unused RCSId
- (const char *) rcsid
{
return RCSId;
}
@end
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.