Return to JFTableViewLoader.m CVS log

Up to [NeXTSTEP 3.3 examples] / Examples / IndexingKit / Ledger

Annotation of Examples/IndexingKit/Ledger/JFTableViewLoader.m, revision 1.1.1.1

1.1       root        1: 
                      2: #import "JFTableViewLoader.h"
                      3: #import "JFTableVectorConfiguration.h"
                      4: /* 
                      5:  *     JFTableViewLoader, NeXT Systems Engineering
                      6:  *     Written by Joe Freeman
                      7:  *
                      8:  *     A list of these configuration objects is fed to a JFTableViewLoader
                      9:  *     to tell it what ivars and titles map into a DBTableView
                     10:  */
                     11: 
                     12: 
                     13: @implementation JFTableViewLoader
                     14: 
                     15: /* static char VERSION[] = " @(#) Version: 2, Project: TableViewLoader, Written By: Joe Freeman, 1992"; */
                     16: 
                     17: - (const char *)getInspectorClassName
                     18: {
                     19:     return "JFDBTVLoaderInspector";
                     20: }
                     21: 
                     22: - setTableView:anObject;
                     23: {
                     24:     tableView = anObject;
                     25:     [tableView setDataSource:self];
                     26:     return self;
                     27: }
                     28: 
                     29: 
                     30: - setDataList:anObject
                     31: {
                     32:     dataList = anObject;
                     33:     [tableView reloadData:self];
                     34: 
                     35:     return self;
                     36: }
                     37: 
                     38: 
                     39: /* this doesn't do what we want in the inspector in IB
                     40:  * because it relies on the tableView nstance var being set up
                     41:  * in ib, the connections in build mode, are fake.  So,
                     42:  * we have to have this method happen in awake
                     43:  */
                     44: - setConfigurationList:cList
                     45: {
                     46: 
                     47:     int                 i;
                     48:     int                 tCount;
                     49:     id                 <DBTableVectors > aVector;
                     50: 
                     51:     [[tableView window] disableFlushWindow];   /* DBTV ignores autodisplay */
                     52:     configList = cList;
                     53:  /* configure the columns */
                     54:  /* first figure out how many columns there are, and how many we need */
                     55:     tCount = [tableView columnCount];
                     56: 
                     57:     for (i = [configList count]; i < tCount; i++)
                     58:        [tableView removeColumnAt:[configList count]];
                     59: 
                     60:  /* then make the numbers match and load up the titles and identifiers */
                     61:     for (i = 0; i < [configList count]; i++) {
                     62:        if (i < tCount) {
                     63:            aVector = [tableView columnAt:i];
                     64:            [aVector setIdentifier:(id)i];
                     65:            [aVector setTitle:[[configList objectAt:i] title]];
                     66:        } else {
                     67:            [tableView addColumn:(id)i
                     68:             withTitle:[[configList objectAt:i] title]];
                     69:        }
                     70:     }
                     71: 
                     72:     [[tableView window] reenableFlushWindow];
                     73:     [[tableView window] flushWindowIfNeeded];
                     74: 
                     75:     return self;
                     76: }
                     77: 
                     78: - setDataList:anObject andConfigurationList:cList
                     79: {
                     80:     [self setConfigurationList:cList];
                     81:  /* now load em up */
                     82:     [self setDataList:anObject];
                     83:     return self;
                     84: }
                     85: 
                     86: /*======================================================================
                     87:  *     Inspector support
                     88:  *======================================================================*/
                     89: 
                     90: - (DBTableView *) tableView
                     91: {
                     92:     return tableView;
                     93: }
                     94: 
                     95: - (List *) dataList
                     96: {
                     97:     if (dataList)
                     98:        return dataList;
                     99:     else
                    100:        return[[List alloc] init];
                    101: }
                    102: 
                    103: - (List *) configList
                    104: {
                    105:     if (configList)
                    106:        return configList;
                    107:     else
                    108:        return[[List alloc] init];
                    109: }
                    110: 
                    111: /*======================================================================
                    112:  *     Archiving
                    113:  *======================================================================*/
                    114: 
                    115: - awakeFromNib
                    116: {
                    117:     [self setConfigurationList:configList];
                    118:     return self;
                    119: }
                    120: 
                    121: - read:(NXTypedStream *) typedStream
                    122: {
                    123:     [super read:typedStream];
                    124: 
                    125:     dataList = NXReadObject(typedStream);
                    126:     configList = NXReadObject(typedStream);
                    127:     tableView = NXReadObject(typedStream);
                    128: 
                    129:     return self;
                    130: }
                    131: 
                    132: - write:(NXTypedStream *) typedStream
                    133: {
                    134:     [super write:typedStream];
                    135: 
                    136:     NXWriteObjectReference(typedStream, dataList);
                    137:     NXWriteObject(typedStream, configList);
                    138:     NXWriteObjectReference(typedStream, tableView);
                    139:     return self;
                    140: }
                    141: 
                    142: /*======================================================================
                    143:  *     DBTableView data source (psuedo-delegate) methods
                    144:  *======================================================================*/
                    145: 
                    146: - (unsigned int)rowCount
                    147: {
                    148:     return[dataList count];
                    149: }
                    150: 
                    151: /* DBTV sends this message when it needs to know what to display */
                    152: - getValueFor:identifier at:(unsigned int)aPosition into:aValue
                    153: {
                    154:  /*
                    155:   * note that when loaded, we set the identifiers to be the locations of the
                    156:   * configuration objects in the configuration list 
                    157:   */
                    158:     if (configList)
                    159:        [[configList objectAt:(int)identifier]
                    160:         getValueFromObject:[dataList objectAt:aPosition]
                    161:         into:aValue];
                    162:     else
                    163:        [aValue setStringValue:""];
                    164:     return nil;
                    165: }
                    166: 
                    167: /* DBTV sends this message when data in a cell has changed */
                    168: - setValueFor:identifier at:(unsigned int)aPosition from:aValue
                    169: {
                    170:     [[configList objectAt:(int)identifier]
                    171:      setValueForObject:[dataList objectAt:aPosition]
                    172:      from:aValue];
                    173:     return nil;
                    174: }
                    175: 
                    176: @end

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