Return to CommandScroll.m CVS log

Up to [NeXTSTEP 3.3 examples] / Examples / UNIX / Subprocess

Annotation of Examples/UNIX/Subprocess/CommandScroll.m, revision 1.1

1.1     ! root        1: /*
        !             2:         CommandScroll.m
        !             3:        by Joe Freeman
        !             4:         Subprocess Example, Release 2.0
        !             5:         NeXT Computer, Inc.
        !             6: 
        !             7:        You may freely copy, distribute and reuse the code in this example.
        !             8:        NeXT disclaims any warranty of any kind, expressed or implied, as to
        !             9:        its fitness for any particular use.
        !            10: */
        !            11: 
        !            12: #import "CommandScroll.h"
        !            13: #import <appkit/nextstd.h>
        !            14: #import <appkit/Font.h>
        !            15: #import <appkit/Text.h>
        !            16: 
        !            17: @implementation CommandScroll
        !            18: 
        !            19: - initFrame:(const NXRect *)frameRect
        !            20: {      
        !            21:     [super initFrame:frameRect];
        !            22:     [self setVertScrollerRequired: YES];
        !            23:     [self setBackgroundGray: NX_WHITE];
        !            24:     [self awake];
        !            25:     return self;
        !            26: }
        !            27: 
        !            28: - awake
        !            29:     // these initializations implemented here so that this object can be
        !            30:     // made an IB palatte more easily 
        !            31: {    
        !            32:     NXRect textRect;
        !            33:     id theText;
        !            34:     
        !            35:     textRect.origin.x = textRect.origin.y = 0.0;
        !            36:     [self getContentSize: &(textRect.size)];
        !            37:     theText =
        !            38:        [[Text alloc]
        !            39:            initFrame: &textRect  text:NULL alignment: NX_LEFTALIGNED];
        !            40:     [theText notifyAncestorWhenFrameChanged:YES];
        !            41:     [theText setHorizResizable:NO];
        !            42:     [theText setVertResizable:YES];
        !            43:     
        !            44:     textRect.size.width = 0.0;
        !            45:     [theText setMinSize:&(textRect.size)];
        !            46:     [self getContentSize: &(textRect.size)];
        !            47:     textRect.size.height = 1000000;
        !            48:     [theText setMaxSize:&(textRect.size)];
        !            49:     
        !            50:     [[theText superview] setAutoresizeSubviews:YES];
        !            51:     [[theText superview] setAutosizing: NX_HEIGHTSIZABLE | NX_WIDTHSIZABLE];
        !            52:     
        !            53:     [theText setCharFilter: NXFieldFilter];
        !            54:     [theText setMonoFont:FALSE];
        !            55:     [self setDocView: theText];
        !            56:     machineFont = [Font newFont:"Ohlfs" size:12];
        !            57:     userFont = [Font newFont:"Courier-Bold" size:13];
        !            58:     return self;
        !            59: }
        !            60: 
        !            61: - setDocView:anObject
        !            62: {
        !            63:     [super setDocView:anObject];
        !            64:     docView = anObject;
        !            65:     [docView setDelegate:self];
        !            66:     return self;
        !            67: }
        !            68: 
        !            69: /*==========================================================
        !            70:  *
        !            71:  * New method for subclass
        !            72:  *
        !            73:  *==========================================================*/
        !            74:  
        !            75: - appendString:(char *)buffer
        !            76:     // append the buffer to the end of the text object
        !            77: {
        !            78:     [docView setSel:[docView textLength] :0];
        !            79:     [docView setSelFont:machineFont];
        !            80:     [docView replaceSel:buffer];
        !            81:     [docView scrollSelToVisible];
        !            82:     lastTextCount = [docView textLength];
        !            83:     return self;
        !            84: }
        !            85: 
        !            86: /*==========================================================
        !            87:  *
        !            88:  * Text Object Delegation
        !            89:  *
        !            90:  *==========================================================*/
        !            91:  
        !            92: - (BOOL)textWillChange:textObject 
        !            93:     // moving the selection to the end before the change means the keys
        !            94:     // the user hits will always appear at the end of the scroll view
        !            95: {
        !            96:     [docView setSel:[docView textLength] :0];
        !            97:     [docView setSelFont:userFont];
        !            98:     [docView scrollSelToVisible];
        !            99:     return NO;
        !           100: }
        !           101: 
        !           102: - textDidEnd:textObject endChar:(unsigned short)whyEnd  
        !           103:     // Get this on every Return if using NXFieldFilter
        !           104:     // really simplistic.  Assumes user does not type ahead
        !           105: {
        !           106:     [docView setSel:[docView textLength] :0];
        !           107:     [docView replaceSel: "\n"];
        !           108:     lastTextCount = [docView textLength];
        !           109:     if (delegate && [delegate respondsTo:@selector(userEntered:)])
        !           110:        [delegate perform:@selector(userEntered:) with:(void *)"\n"];
        !           111:     return self;
        !           112: }
        !           113: 
        !           114: - textDidGetKeys:textObject isEmpty:(BOOL)flag 
        !           115:     // Send each character as it is entered.
        !           116:     // The delta calculation is in case the user has backspaced.
        !           117: {      
        !           118:     int        delta;          // the difference in this length from previous
        !           119:     int        theLength;      // current length of text object
        !           120:     char *theText, miniBuffer[2];
        !           121:     BOOL mallocedTheText = NO;
        !           122:     
        !           123:     theLength = [docView textLength];
        !           124:     delta = theLength - lastTextCount;
        !           125:     if (delta > 0)
        !           126:     {
        !           127:         theText = (char *)malloc(delta + 1);
        !           128:         mallocedTheText = YES;
        !           129:        [docView
        !           130:            getSubstring:theText
        !           131:            start:([docView textLength]-delta)
        !           132:            length:delta];
        !           133:        theText[delta] = '\0';
        !           134:     }
        !           135:     else
        !           136:     {
        !           137:         theText = miniBuffer;
        !           138:        strcpy(theText,"\177");
        !           139:     }
        !           140:     if (delegate && [delegate respondsTo:@selector(userEntered:)])
        !           141:        [delegate perform:@selector(userEntered:) with:(void *)theText];
        !           142:     lastTextCount = theLength;
        !           143:     
        !           144:     if (mallocedTheText) {
        !           145:         free(theText);
        !           146:     }
        !           147:     
        !           148:     return self;
        !           149: }
        !           150: 
        !           151: @end

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.