TImage

type TImage = record

  LeftEdge: SmallInt;

  TopEdge: SmallInt;

  Width: SmallInt;

  Height: SmallInt;

  Depth: SmallInt;

  ImageData: PWord;

  PlanePick: Byte;

  PlaneOnOff: Byte;

  NextImage: PImage;

end;