This is SaveAsPanel.m in view mode; [Download] [Up]
/*
* (a) (C) 1990 by Adobe Systems Incorporated. All rights reserved.
*
* (b) If this Sample Code is distributed as part of the Display PostScript
* System Software Development Kit from Adobe Systems Incorporated,
* then this copy is designated as Development Software and its use is
* subject to the terms of the License Agreement attached to such Kit.
*
* (c) If this Sample Code is distributed independently, then the following
* terms apply:
*
* (d) This file may be freely copied and redistributed as long as:
* 1) Parts (a), (d), (e) and (f) continue to be included in the file,
* 2) If the file has been modified in any way, a notice of such
* modification is conspicuously indicated.
*
* (e) PostScript, Display PostScript, and Adobe are registered trademarks of
* Adobe Systems Incorporated.
*
* (f) THE INFORMATION BELOW IS FURNISHED AS IS, IS SUBJECT TO
* CHANGE WITHOUT NOTICE, AND SHOULD NOT BE CONSTRUED
* AS A COMMITMENT BY ADOBE SYSTEMS INCORPORATED.
* ADOBE SYSTEMS INCORPORATED ASSUMES NO RESPONSIBILITY
* OR LIABILITY FOR ANY ERRORS OR INACCURACIES, MAKES NO
* WARRANTY OF ANY KIND (EXPRESS, IMPLIED OR STATUTORY)
* WITH RESPECT TO THIS INFORMATION, AND EXPRESSLY
* DISCLAIMS ANY AND ALL WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR PARTICULAR PURPOSES AND NONINFRINGEMENT
* OF THIRD PARTY RIGHTS.
*/
/*
* SaveAsPanel.m
*
* Necessary because of the difficulty of obtaining a copy
* of the SavePanel. This subclass of panel uses the SavePanel
* panel and switches the panel between Save and SaveTo.
* The panel is switched back and forth as needed.
*
* Version: 2.0
* Author: Ken Fromm
* History:
* 03-07-91 Added this comment.
*/
#import "SaveAsPanel.h"
#import <appkit/ButtonCell.h>
#import <appkit/Matrix.h>
#import <appkit/TextField.h>
#import <appkit/View.h>
#import <appkit/nextstd.h>
@implementation SaveAsPanel
- setSaveTo
{
id aview;
aview = [[self contentView] findViewWithTag: NX_SPTITLEFIELD];
[aview setStringValueNoCopy:"SaveTo"];
[self setRequiredFileType:"eps"];
return self;
}
- setFormat:(int) aFormat
{
[[accessoryView findViewWithTag: SP_BUTTONTAG] selectCellWithTag:aFormat];
return self;
}
- (int)format
{
return [[accessoryView findViewWithTag: SP_BUTTONTAG] selectedTag];
}
@end
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.