Во, во, Петрович как всегда выкрутился сразу видно, настоящий русский программист (под словом русский имеется ввиду CCCP). Только не используй динамические массивы, если хочешь записывать в типизированный файл.

Цитата

... пишет данные в типизированный файл

Типизированный файл - это хорошо(для новичка) и плохо(для реализации) - Но это моё мнение.
В свое время столько по имел с "Типизированными файлами" проблем.
Поэтому лудше используй String и свои обработчики записи и считывания, не забудь записывать в файл версию файла(т.е. формата данных в файле).

Цитата(Pegas @ 21.6.2004, 09:48)

Во, во, Петрович как всегда выкрутился сразу видно, настоящий русский программист (под словом русский имеется ввиду CCCP). Только не используй динамические массивы, если хочешь записывать в типизированный файл.

я бы сказал, как всегда попал в точку

Цитата

Во, во, Петрович как всегда выкрутился

Наверное не донес . Я то имел ввиду, что так можно, но это извращение.
Правильнее конечно будет наладить нормальную запись AnsiString. И вообще, лучше иметь не запись, а объект который умеет сам себя писать и читать. Причем, как правильно отметил Girder, в начало файла надо писать версию его структуры, тогда, при дальнейшем развитии программы не будет проблем с чтением "старых" файлов.

спросил только часто ли бывает что длинна (полное имя) файла превышает 255 символов, а тут столько вариантов и советов! спасибо
Петрович про R/W объектов это хорошо когда объект сам по себе... а вот если он является частью части динамического массива, например:

Код

Type myType1 = Object;         ...       end; Type myBigType1 = Object;         private           Items: Array of myType1;          ...         public          procedure Add (Data: myType1);               ...     end; Type Body = Object         private            Items: Array of myBigType1;          ...        public         ...   end;

то запись/чтение такого объекта "немного" усложнится... может конечно сказывается мой дурной тон программирования, но я очень часто использую такой вид структуры.
Когда объект содержит текстовую информацию, и известно, что его длинна влегкую привысит 255 символов, то тогда приходится использвать нетипизированный файл и ф-цию BlockWrite, но это в свою очередь влечет за собой то что в таком случае приходится все properties объекта записывать и считывать "вручную" (BlockRead - BlockWrite) что неочень удобно, т.к. в случае если мне вдруг понадобилось добавить какое ни будь свойство в объект, то приходится переписывать заново процедуру чтения/записи...
Согласитесь проще использовать Record и записать в такой-же нетипизированный файл, но таким способом:

Код

for i := 0 to MyObject.RecCount-1 do begin BlockWrite (someF, MyObject.RecVersion, SizeOf (TrecVersion)); BlockWrite (someF, MyObject.MyRecord[i], SizeOf (TmyRecord)); end

а считывать так:

Код

BlockRead (someF, MyObject.RecCount, SizeOf (Integer)); SetLength (MyObject.MyRecord, MyObject.RecCount); for i := 0 to MyObject.RecCount-1 do begin BlockRead (someF, MyObject.RecVersion, SizeOf (TrecVersion)); case MyObject.RecVersion of ver1101:         begin            BlockRead (someF, MyAlfa, SizeOf (TmyAlfa));            Convert (MyAlfa, MyObject.MyRecord[i]);         end; ver1102:         begin            BlockRead (someF, MyBeta, SizeOf (TmyBeta));            Convert (MyBeta, MyObject.MyRecord[i]);         end; ver1103:  BlockRead (someF, MyObject.MyRecord[i], SizeOf (TmyRecord)); end

и в этом случае уже не надо следить за тем какие данные используются (в ф-ции чтения/записи) а какие еще нет..

Дабы не развивать здесь дисскусию о том кто как пишет, я соглашусь что приведенный выше способ тоже имеет право на жизнь. Хотя я предпочитаю объекты хранить не в массивах, а в коллекциях, ... ... ...

Цитата

И вообще, лучше иметь не запись, а объект который умеет сам себя писать и читать.

Может быть я не понял ответа, но хотел бы заметить, что объекты нельзя записывать в типизированный файл. Если конечно речь шла об этом.

Цитата

ЗЫ у себя на компе ненашел ниодного файла длиннее 255 символов. у кого нибудь есть?

Например у меня в "E:\Documents and Settings\Администратор\Мои документы" достаточно развесистая клюква подкаталогов с весьма некороткими русификованными названиями, документы тоже именуются не "DOC1.RTF" - так что там полные имена по 300-500 байт сплошь и рядом...

Цитата

Если конечно речь шла об этом.

Тут взглянул наверх, и обнаружил что тема-то вообще не касалась записи файлов
А что касается:

Цитата

Может быть я не понял ответа, но хотел бы заметить, что объекты нельзя записывать в типизированный файл.

то nJIaKca.spb в своем примере пользует BlockWrite что практически не отличается от использования tFileStream.