ftp.nice.ch/pub/next/tools/workspace/Clocks.s.tar.gz#/Clocks/DelayInfo.m

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

/* Generated by Interface Builder */

#import "DelayInfo.h"
#import <appkit/Window.h>
#import <appkit/Application.h>

@implementation DelayInfo

+ new				// make sure that infoPanel is nil.
{
  self = [super new];
  infoPanel=nil;
  return self;
}

- setInfoPanel:anObject		// set the infoPanel.
{
    infoPanel = anObject;
    return self;
}

- infoPanel			// return the infoPanel, load it if needed.
{
  if( !infoPanel)
    [NXApp loadNibSection:"InfoPanel.nib" owner:self withNames:NO];
  return infoPanel;
}

- info:sender			// make the info panel be up there.
{
  [[self infoPanel] makeKeyAndOrderFront:sender];
  return self;
}

// Are these useful?  I think not.  Not expensive, though.
- write:(NXTypedStream *)stream
{
    [super write:stream];
    NXWriteObjectReference( stream, infoPanel);
    return self;
}
- read:(NXTypedStream *)stream
{
    [super read:stream];
    infoPanel=NXReadObject( stream);
    return self;
}

@end

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