Копирование строк из файла в файл TStringList

[Аватар]

В этом коде запись в один файл. Объяви переменную k. Начальное значение 0.
При переходе на запись в следующий файл увеличь её на 1. Тогда цикл вставки строк можно так сделать, при условии, что дописывается одинаковое к-во строк в каждый файл

for j:=0 to Form1.sSpinEdit3.Value-1 do WriteLn(f, sl.Strings[k*Form1.sSpinEdit3.Value+j]);

[FleXik]

слава баранам!!11 наконец то.... Аватар спасибо огромное!! но нужно еще было прописать

Inc(k);
Inc(j);

ибо без этого не работало.

так.. и последняя проблема копирует рандомно (5-2-3-4-1) в таком порядке, а надо по очереди (1-2-3-4-5), когда делал 1 строку исправлял но уже не помню как(

неужели никто не знает как сделать чтобы по очереди копировало а не рандомно?

[s-andriano]

Сообщение от FleXik

неужели никто не знает как сделать чтобы по очереди копировало а не рандомно?

Наверное, копируется как раз по порядку (запустите два раза и убедитесь, что порядок один и тот же).
Если Вам нужен другой порядок - переупорядочивайте.

[FleXik]

не по порядку проверял уже... почему не по порядку я без понятия.. раньше когда только с 1 строкой работало так же не по порядку делало, я исправил (не помню как и все работало отлично), сейчас та же беда...

посмотрел, счетчик работает правильно, но почему-то файлы сохраняються не по очереди.

народ, помогите пожалуйста, уже по всяко разному перепробовал всеровно не по порядку(

всё еще нуждаюсь в помощи