TWindow

type TWindow = record

  NextWindow: PWindow;

  LeftEdge: SmallInt;

  TopEdge: SmallInt;

  Width: SmallInt;

  Height: SmallInt;

  MouseX: SmallInt;

  MouseY: SmallInt;

  MinWidth: SmallInt;

  MinHeight: SmallInt;

  MaxWidth: Word;

  MaxHeight: Word;

  Flags: LongWord;

  MenuStrip: PMenu;

  Title: PChar;

  FirstRequest: PRequester;

  DMRequest: PRequester;

  ReqCount: SmallInt;

  WScreen: PScreen;

  RPort: PRastPort;

  BorderLeft: ShortInt;

  BorderTop: ShortInt;

  BorderRight: ShortInt;

  BorderBottom: ShortInt;

  BorderRPort: PRastPort;

  FirstGadget: PGadget;

  Parent: PWindow;

  Descendant: PWindow;

  _Pointer: PWord;

  PtrHeight: ShortInt;

  PtrWidth: ShortInt;

  XOffset: ShortInt;

  YOffset: ShortInt;

  IDCMPFlags: LongWord;

  UserPort: PMsgPort;

  WindowPort: PMsgPort;

  MessageKey: PIntuiMessage;

  DetailPen: Byte;

  BlockPen: Byte;

  CheckMark: PImage;

  ScreenTitle: PChar;

  GZZMouseX: SmallInt;

  GZZMouseY: SmallInt;

  GZZWidth: SmallInt;

  GZZHeight: SmallInt;

  ExtData: PByte;

  UserData: PSmallInt;

  WLayer: PLayer;

  IFont: PTextFont;

  MoreFlags: LongWord;

  RelLeftEdge: SmallInt;

  RelTopEdge: SmallInt;

  FirstChild: PWindow;

  PrevChild: PWindow;

  NextChild: PWindow;

  Parent2: PWindow;

end;