How Can I Save a Dynamic Array to a FileStream in Delphi?

delphi, dynamic-arrays, filestream

Solution

Use: http://code.google.com/p/kblib/

type
  IndiReportIndi = record
    IndiName: string;
    NameNum: integer;
    ReportIndiName: string;
  end;

  TXRefList = array of IndiReportIndi;

var
  XRefList: TXRefList;

To save whole XRefList to stream use:

TKBDynamic.WriteTo(lStream, XRefList, TypeInfo(TXRefList));

To load it back:

TKBDynamic.ReadFrom(lStream, XRefList, TypeInfo(TXRefList));

Problem

I have the following structures in Delphi 2009: ``` type IndiReportIndi = record IndiName: string; NameNum: integer; ReportIndiName: string; end; var XRefList: array of IndiReportIndi; ``` where XRefList is a dynamic array. I want to save XRefList to a FileStream. How do I do that AND include all the IndiName and ReportIndiName strings so that they will all be retrievable again when I later load from that FileStream?

Original source

Related problems