ооо322

28.01.2020 09:39 •  Информатика

Надо (делфи 7) разрабатываемая программа предназначена для вычеркивания из матрицы заданной строки и столбца. всё через стринггрид, эдиты и кнопочки. для наглядного примера, кнопочку удаления, объясните, где накосячила : с procedure tform1.button2click(sender: tobject); begin y : = strtoint(edit3.text); for y: =stringgrid1.row+1 to stringgrid1.rowcount-1 do //удаление строки for x: =0 to stringgrid1.colcount-1 do stringgrid1.cells[x,y-1]: =stringgrid1.cells[x,y]; stringgrid1.rowcount: =stringgrid1.rowcount-1; x : = strtoint(edit4.text); for x: =stringgrid1.col+1 to stringgrid1.colcount-1 do //удаление столбца for y: =0 to stringgrid1.rowcount-1 do stringgrid1.cells[y,x-1]: =stringgrid1.cells[y,x]; stringgrid1.colcount: =stringgrid1.colcount-1; end;