Список memo и создание файла

@adelbaew2 · Регистрация: 05.02.2013

Гружу список текстовый файл - например

Delphi

апп
прор
прорп
пропр
...
апп
пр

Необходимо по 50 строчек в списке (текстового файла, а лучше сделать как то через memo)
сохранять в документе

через

Delphi

1	SaveToFile(getcurrentdir+'/'+Edit6.Text+'/'+i+'.txt', Tencoding.UTF8);

где i меняется от 1 до (числа без остатка=конец списка/50)

@ZfoxAK · 17.12.2015, 05:50

приведи значение целых чисел i к типу string - IntToStr

Добавлено через 3 минуты

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

Edit6.Text+'/'+i+'.txt'

......Edit6.Text+'/'+IntToStr(i)+'.txt'

@ZfoxAK 669 / 559 / 242 Регистрация: 26.11.2012 Сообщений: 2,191
	17.12.2015, 05:50	2
	приведи значение целых чисел i к типу string - IntToStr Добавлено через 3 минуты Сообщение от adelbaew2 Edit6.Text+'/'+i+'.txt' ......Edit6.Text+'/'+IntToStr(i)+'.txt' 0