ошибка, после того как я создал запись 'fayl'

[ZhekON]

извини "SIS", я понял свою ошыбку, просто давно ужэ не пользовался записями и вот к чему пришол
но есть ещё вопросы:
1. как добавить в файл записи запись, append() - не действует на файлы-записи.
2. как создать переменную чтобы в неё вмещалось СКОЛЬКО УГОДНО символов?

[ЧИЖ]

Для типизированного файла не нужна append() там есть круче
seek(f,pos) pos:longint - позиция файлового указателя к которой надо перейти для следующей операции pos=0 - начало файла т. е. можно не только читать откуда хочешь но и вписывать хоть в середину (правда на место старой записи, если в конец то добавится)

последнюю позицию соответственно можно найти делением размера файла на байтовую длинну твоей записи

а в качстве бесконечной строки ичпользуется PChar (PAnsiChar) но в запись его добавлять нельзя - сторока динамическая (начинается с нулевого элемента и заканчивается #0 из string переводится ф-ей Pchar(s:string))

[zetrix]

последнюю позицию соответственно можно найти делением размера файла на байтовую длинну твоей записи

var fil: file of fayl;
если файл задан как типизированный, то sizeof(fil) возвратит кол-во записей в файле, и того seek(fil,sizeof(fil)); и можно смело писать, мы в конеце файла.

[zetrix]

последнюю позицию соответственно можно найти делением размера файла на байтовую длинну твоей записи

var fil: file of fayl;
если файл задан как типизированный, то sizeof(fil) возвратит кол-во записей в файле, и того seek(fil,sizeof(fil)); и можно смело писать, мы в конце файла.

[Umen]

2sis: согласен, написал нашару (спешил очень) :-)

[ZhekON]

Сообщение от ЧИЖ

а в качстве бесконечной строки ичпользуется PChar (PAnsiChar) но в запись его добавлять нельзя - сторока динамическая (начинается с нулевого элемента и заканчивается #0 из string переводится ф-ей Pchar(s:string))

А как тогда мне поместить бесконечную строку в запись???