Wenn du mit "Tags" arbeitest kann es dir sogar egal sein ob Typ A und/oder B überhaupt vorhanden sind
Delphi-Quellcode:
with Reader do begin
while NextValue <> vaString do SkipValue;
RLine := ReadString;
if RLine='<BEGINOFHEADERTYPC>' then begin
LokalerRecordTypC.Version := ReadInteger;
LokalerRecordTypC.Pos := ReadInteger;
LokalerRecordTypC.Len := ReadInteger;
LokalerRecordTypC.HeaderType := ReadString; // hier bin ich mir nicht ganz sicher; ausprobieren
end;
end;