Изображение не полностью считывается из Image

[september]

Считываю значения пикселей из image в матрицу (изображение grayscale). Если картинка квадратная то все ок, если картинка прямоугольная, то нормально считывается только квадратная часть картинки, а все остальные пиксели считываются со значением 255. То есть если я гружу картинку 150x200, область 150x150 считывается нормально, а у остальных пикселей будет значение 255. Avtosize=true, на форме картинка отображается нормально. Считываю стандартно:

Image1.Picture.LoadFromFile(Edit1.t ext);
h:=image1.Height;
w:=image1.Width;
setlength(image,h);
for i:=0 to h-1 do
setlength(image[i],w);
for i:=0 to h-1 do
for j:=0 to w-1 do
image[i,j]:=GetRValue(Image1.Canvas.Pixels[i,j]);

[chertovich]

Значения H и W какое в отладчике?

[september]

h и w правильные

[chertovich]

Ошибка в этой строке

Image1.Canvas.Pixels[i,j]

Надо

Image1.Canvas.Pixels[j,i]

потому что первый аргумент X, второй Y. А ваш массив первый элемент строка, второй - столбец