Effizienter binär-output eines (word)-streams

[Sinspin]

Was du machen kannst ist einen Typen mit mehr als einem Zustand zu verwenden:

Delphi-Quellcode:

type
  TDual = packed record
  case byte of
  0 : (a : word);
  1 : (b: record hi,lo : byte;end);
  end;

Dann hast Du zur gleichen Zeit Zugriff darauf als Word und als Bytes. Das ganze als Array anlegen und nach Möglichkeit blockweise lesen und schreiben. Das spart Zeit beim Zugriff.