This is Appender.m in view mode; [Download] [Up]
// // An Object to Append Text to IB's Default ScrollView // Randy NelsonÐCopyright NeXT Computer, Inc 1990 All Rights Reserved // Created 5-1-90 // Modified 9-3-90 -- Removed outlet initializers. // // You may freely copy, distribute and reuse the code in this example. // NeXT disclaims any warranty of any kind, expressed or implied, as to // its fitness for any particular use. // #import "Appender.h" #import <appkit/ScrollView.h> #import <appkit/Text.h> @implementation Appender //prints the doc view of the scroll view - print:sender { [[scrollView docView] printPSCode:self]; return self; } //appends the string passed to the doc view of the scroll view - appendToText:(const char *)newText { int currentLength; currentLength = [[scrollView docView] textLength]; [[scrollView docView] setSel:currentLength :currentLength]; [[scrollView docView] replaceSel:newText]; [[scrollView docView] scrollSelToVisible]; return self; } @end
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.