type pRCentry = ^tRCentry; tRCentry = record name: pgChar; value: pgChar; end; pRCsection = ^tRCsection; tRCsection = record name: pgChar; entries: array of tRCentry; end; pRCfile = ^tRCfile; tRCfile = record sections: array of tRCsection; end;