tagScrollInfo = record
    cbSize : UINT; // Taille de cette structure = sizeof(TScrollInfo)
    fMask : UINT; // Voir ci dessous
    nMin: Integer;
    nMax: Integer;
    nPage: UInt;  // Taille de la ScrollBox proportionnellement au range de la ScrollBar
    nPos: Integer; // Position par rapport au range de la ScrollBar
    nTrackPos: Integer;
  end;
  PScrollInfo = ^TScrollInfo;
  TScrollInfo = tagScrollinfo;