никак не могу осуществить нормальную запись в .txt. Программе необходимо считать последовательности чисел из файла, сверить, чтобы сгенерированные последовательности не были такими же, и дописать их в файл. На деле получается так, что файл просто перезаписывается. Новые данные есть, а старые исчезают . Делал, грубо говоря, так:
m=1 x=1 z=1
For i = 1 to Eof array$(x)=ReadLine(filename) x=x+1 Next
Потом, после генерации и проверки последовательностей, все писалось в другой массив:
exist$(z)=name$ z+z+1
И после этого делалась запись в файл:
For i = 1 to z WriteLine(filename, m) m=m+1 Next
Не работает. Есть варианты это исправить?
Добавлено (09 Июня 2018, 16:38) --------------------------------------------- *z=z+1
А насчет записи, копай в сторону SeekFile. Если не получится, то просто при открытии копируй содержимое в память и дальше ее дополняй и записывай обратно в файл. Blitz3d вроде как перезаписывает данные.
. Делал, грубо говоря, так:
