RowCount (ImageList Control) example for Delphi 4

var 
LinesPerPage : LongInt;

begin

if (LEADImgList1.ScrollStyle = SCROLLSTYLE_VERTICAL) then
    LinesPerPage := LEADImgList1.RowCount div LEADImgList1.PageCount
else
    LinesPerPage := LEADImgList1.ColumnCount div LEADImgList1.PageCount;

end;