TWindowPos

type TWindowPos = record

  id: LongWord;

  x1: SmallInt;

  y1: SmallInt;

  w1: SmallInt;

  h1: SmallInt;

  x2: SmallInt;

  y2: SmallInt;

  w2: SmallInt;

  h2: SmallInt;

end;