EachIn troubles

Ignore me. I fixed it, I was talking rubbish, the following code works fine.

Strict

Type TSetting
   Field name:String
   Field val:String
End Type

Type TSettingsFile
   Field settings:TList

   Method New()
       settings = New TList
   End Method

   Method addSetting(sName:String, sVal:String)
      Local newSetting:TSetting = New TSetting
      newSetting.name = sName
      newSetting.val = sVal
      ListAddLast self.settings, newSetting
   End Method

   Method SaveToFile(sFileName:String)

       Local s:TSetting
       For s = EachIn self.settings
           Print s.Name + " = " + s.Val
       Next
   End Method
End Type


Local file:TSettingsFile = New TSettingsFile

file.addSetting("swers","kk132")
file.addSetting("sdsfs","kdsfk2")
file.addSetting("ssdfewrs","kfdk")

file.SaveToFile("")