Показать сообщение отдельно
  #3  
Старый 22.07.2012, 20:27
Аватар для R-18Rus
R-18Rus R-18Rus вне форума
Новичок
 
Регистрация: 08.04.2012
Сообщения: 68
Версия Delphi: Delphi 7
Репутация: 127
По умолчанию

В коде ошибок нет. Всё работает.
Проблема с заполнением строки s. Если из Лабеля берётся значение 1, то в файле прога находит все строки, что между Г1 и Г2, и записывает их в строку s соответственно. Если в Лабеле значение 2, то нужно считать всё, что между Г2 и Г3; если 3, то между Г3 и Г4 и т.д.
С 1 всё как надо, с 2,3,4... - чтение не происходит, s - пустая строка.
Ответить с цитированием