Показать сообщение отдельно
  #4  
Старый 09.07.2014, 08:10
Tonyy Tonyy вне форума
Новичок
 
Регистрация: 05.04.2010
Сообщения: 85
Репутация: 10
По умолчанию

в выше описанном методе tsps.read если поставить shomessage внутрь цикла создания и чтения строк - то он показывает значение. а если поставить после цикла, то ошибка доступа, какой бы элемент я не выводил
Код:
procedure tsps.read;
var
t:TStringList;
i:Cardinal;
begin
    t:=TStringList.Create;
    t.LoadFromFile(name);
    for i:=0 to t.Count-1 do begin
    spsStroka[i]:=TspsStrka.create();
    spsStroka[i].read(t[i]);
    showmessage(FloatToStr(spsStroka[i].Npr)); // - работает
    end;
//а если поставить здесь 
showmessage(FloatToStr(spsStroka[i].Npr)); // то ошибка accesviolaion
t.Free;
end;
Ответить с цитированием