Файл и много картинок в нём. Нужны идеи

[Аццкий прогер]

Доброго времени суток!

В общем нужда такая: есть тип:

MyEvent = Record
  Data: TDate;
  Photo: TBitmap; // или какой-нибудь другой тип для сохранения изображения
  SubLabel: String[255];  // типа подпись к картинке
  Comments: String[255];
end;

Нужно этот тип сохранять в файл, но из-за динамичности типа TBitmap просто указать file of MyEvent не получается. А нужно что бы и картинка (любого размера) и остальные данные были в одном файле. Как можно организовать такой файл?

[Kotofff]

А может лучше применить базу данных ?
Absolute Database, например ...

[Stilet]

Или (что почти то же самое) в файл сохранять путь к файлу-картинке.

[mutabor]

TFileStream в помощь. А вообще действительно, это можно реализовать намного проще, просто ссылки на файлы сохранять (выше два способа описали), но если все же есть необходимость впихнуть все в один файл, то используйте TFileStream.

[Аццкий прогер]

Спасибо. Попробую Absolute Database. Не понравится - буду над TStream думать.

[Аццкий прогер]

Попробовал Absolute Database. Понравилось! Картинки JPEG сохраняет в поле типа BLOB. А вот как организовать запись и чтение (показ в программе) JPEG, я так и не допёр...