createlist.bmx 348 B

1234567891011121314151617
  1. SuperStrict
  2. Framework Brl.LinkedList
  3. Import Brl.StandardIO
  4. ' create a list to hold some objects
  5. Local list:TList = CreateList()
  6. ' add some string objects to the list
  7. ListAddLast(list,"one")
  8. ListAddLast(list,"two")
  9. ListAddLast(list,"three")
  10. ' enumerate all the strings in the list
  11. For Local a:String = EachIn list
  12. Print a
  13. Next