TstringList...как использовать?

[MyLastHit]

Здравствуйте... Решил воспользоваться классом TStringList, и тут же начались проблемы... Подскажите пожалуйста что я делаю не так:

  main:=TStringList.Create;
  id:=TStringList.Create;
  main.LoadFromFile(dir+'\tester.txt');
  for i:=1 to main.Count do
  begin
    id.Add(Copy(main.Strings[i],5,1));//Тут...принципиально не хочет понимать что мне нужна i-ая строка...
  end;

Ошибка лезет и все тут...вроди делаю как на delphibasics пишут..

[Прик]

Нумерация с нуля:

for i:= 0 to main.Count-1 do

P.S. При обращение к строкам TstringList можно опустить Strings:
main.Strings[i] эквивалентно main[i]

[SERG1980]

только после уничтожать объекты не забывайте