Запись в файл строки длиннее 255

[DIgorevich]

Да, видимо, все-таки придется использовать БД, хоть и не хотелось изначально.

[Аватар]

Можно и XML или ClientDataSet использовать без СУБД.

[phomm]

Вот мой модуль из 3летней давности системы тестирования, отвечает за запись бинарного файла тестов (итоговый поток ещё шифруется) у которых сложная структура с вложенными структурами: тест содержит свои данные, в т.ч. строку описания, плюс набор вопросов, вопрос содержит данные, в т.ч. строку текста, плюс набор ответов, ответ содержит свои данные плюс строку ответа. Длина строки ограничена здравым смыслом - 65536 байт (но это можно легко увеличить), все строки пишутся таким образом:

w := length(mainsys.curtest.name) * SizeOf(Char); // var w: Word;
ms.Write(w, sizeof(w));
ms.Write(mainsys.curtest.name[1], w); // имя теста

Пишется 2байта для длины строки, и потом сами данные строки. Для учёта юникода (для дельфи 2009+) надо использовать умножение на SizeOf(Char) (но это универсальное средство, и для неюникода тоже работает адекватно)

[DIgorevich]

Сообщение от Аватар

Можно и XML или ClientDataSet использовать без СУБД.

Ага, именно на XML и остановился.