TImageDescriptor = packed record
  Separator: byte;
  Left: word;
  Top: word;
  Width: word;
  Height: word;
  PackedFields: byte;
end;

struct TImageDescriptor {
  byte Separator;
  word Left;
  word Top;
  word Width;
  word Height;
  byte PackedFields;
};