улучшения цифрового изображения

[Victoria.ua]

Помогите пожалуйста! Я не программист, но мне нужна ваша помощь. Дано изображение. Нужно рассчитать количество пикселей для каждого уровня яркости. Записать в массив.
Массив (tpgis = array [0 .. 255] of Integer, расчет делаю в цикле, после этого записываю:
k: = pbytearray (Image1.Picture.Bitmap.scanline [y]) ^ [x];
tpgis [k]: = tpgis [k] +1;
И получаю в ответ:
[Error] rozrax.dpr (80): Incompatible types: 'tpgis' and 'Byte'
Что делать????

[Dilex]

Сообщение от Victoria.ua

Помогите пожалуйста! Я не программист, но мне нужна ваша помощь. Дано изображение. Нужно рассчитать количество пикселей для каждого уровня яркости. Записать в массив.
Массив (tpgis = array [0 .. 255] of Integer, расчет делаю в цикле, после этого записываю:
k: = pbytearray (Image1.Picture.Bitmap.scanline [y]) ^ [x];
tpgis [k]: = tpgis [k] +1;
И получаю в ответ:
[Error] rozrax.dpr (80): Incompatible types: 'tpgis' and 'Byte'
Что делать????

Если я не ошибаюсь у вас несовпадение типов.

[Victoria.ua]

Я понимаю, что не несовпадения типов. Тогда возникает вопрос: Какие типы являются сувмистими?