home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / RB3641.ZIP / EX1 / MYTXTLST.MTH < prev    next >
Text File  |  1991-12-16  |  273b  |  15 lines
  1.  
  2.  
  3.  
  4. !TestView methods !
  5.    
  6. myTextList: aListBox
  7.  
  8.       | myCollection |
  9.  
  10.       myCollection := OrderedCollection new.
  11.       myCollection add: 'Row 1';
  12.                    add: 'Row 2';
  13.                    add: 'Row 3'.
  14.       aListBox contents: myCollection.! !
  15.