Расчет среднего значения цвета пикселей в цикле

int R,G,B,i,j;
double p_value=0;   // временная переменная суммы значений квадрата пикселей
int cx=38;          // константа ширины квадрата
int cy=36;          // константа высоты квадрата
int kvx=1;           // счетчик рассчитуемого квадрата по горизонтали
int kvy=1;          // счетчик рассчитуемого квадрата по вертикали
int a=0;           // ячейки SG2
int b=0;           // ячейки SG2
int i_s=0;         // начальная точка квадрата по х
int j_s=0;         // начальная точка квадрата по у
 
 
//for (kvy = 1; kvy < 11; kvy++) {                временно отказался от перехода по y квадратам
        for (kvx = 1; kvx < 11; kvx++) {   // цикл начинается с расчета первого квадрата по горизонтали
            for (i = i_s; i < cx; i++) {      // начиная с нулевого пикселя и до граничного в квадрате по иксу...
                for (j = j_s; j < cy; j++) {  // начиная с нулевого пикселя и до граничного в квадрате по игрику...
                    p_value = p_value+GetRValue(Form2->Image1->Picture->Bitmap->Canvas->Pixels[i][j]); // суммируем значение R составляющей
                }
            }
        p_value=p_value/1368;  // получаем среднее значение R в пройденном квадрате
        Form2->StringGrid2->Cells[a][b]=p_value; // записываем полученное среднее
        p_value=0; // обнуляем временную переменную суммирования
        i_s=cx;      // смещаем начало следующего квадрата по горизонтали
        cx=cx+cx; // смещаем конец следующего квадрата по горизонтали
        b++; // следующее значение в соседнюю ячейку StringGrid
        }
    /*i_s=0; // аналогичный цикл, который смещает расчет квадратов вниз, по игрику
    cx=38;
    b=0;
    a++;
    j_s=cy;
    cy=cy+cy;
    }      */

cx=cx+cx; // смещаем конец следующего квадрата по горизонтали

cx=cx+38; // смещаем конец следующего квадрата по горизонтали