Ввод и вывод двумерных массивов c помощью компонента StringGrid

После создания на форме строковой таблицы (компонент StringGrid) и задания с помощью Инспектора Объектов ее свойств, в программе нужно записать группу операторов для подписи строк и столбцов таблицы, чтобы пользователю программы было понятно, как вводить данные. Их можно записать в отдельной процедуре, связанной с событием выход (Exit) из компонента Edit, где вводится размерность массива, или в процедуре, связанной с событием создания формы (FormCreate).

{Процедура подготовки таблицы на форме для ввода квадратной матрицы, которая выполняется при выходе из поля ввода размерности матрицы.}

procedure TForm1.Edit1Exit(Sender: TObject);

Var i,j:Integer;// номера строки столбца квадратной матрицы

begin

// порядок матрицы получает свое значение из поля ввода

N:=StrToInt(Edit1.Text);

// свойство количество строк компонента StringGrid

// получает значение: порядок +1

StringGrid1.RowCount:=N+1;

// свойство количество столбцов компонента StringGrid

// получает значение порядок: +1

StringGrid1.ColCount:=N+1;

//подпись заголовка таблицы

For i:=1 to StringGrid1.RowCount do

StringGrid1.Cells[i,0]:= IntToStr(i);

// подпись строк таблицы

For j:=1 to StringGrid1.ColCount do

StringGrid1.Cells[0,j]:= IntToStr(j);

// добавление в свойства таблицы признака

//допустимости редактирования содержимого ячеек таблицы

StringGrid1.Options:= StringGrid1.Options +[goEditing];

end;