ftp.nice.ch/pub/next/graphics/viewer/Flipper.s.tar.gz#/Controller.m

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

/* Generated by Interface Builder */

#import "Controller.h"
#import "ImageView.h"
#import <appkit/OpenPanel.h>
#import <libc.h>

@implementation Controller

- getAndDisplay:sender
{
	id thePanel = [OpenPanel new];	
	[thePanel allowMultipleFiles:YES];
	[thePanel setPrompt:"TIFF File"];
	[thePanel setDelegate:self];
	if ([thePanel runModalForDirectory:""  file:""])
		[self ok:thePanel];
    return self;
}

 - ok:sender
{
	chdir([sender directory]);
	[theImage setListToFiles:[sender filenames]];
	return self;
}	

- cancel:sender
{
	return self;
}

- next:sender
{
	return self;
}

- animate:sender
{
	return self;
}

@end

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