Delphi Stringgrid Заполнение

StringGrid является очень удобным элементом Delphi для отображения и редактирования табличных данных. Для заполнения StringGrid из программы мы можем использовать циклы и массивы.

Представим, что у нас есть форма с StringGrid, в которую мы хотим добавить некоторые данные. Код для заполнения StringGrid может выглядеть так:

for i := 0 to StringGrid1.RowCount - 1 do 
begin 
  StringGrid1.Cells[0, i] := IntToStr(i); 
  StringGrid1.Cells[1, i] := 'Значение ' + IntToStr(i); 
end;

В этом коде мы используем цикл for для прохода по всем строкам в StringGrid. Затем мы заполняем первый столбец i-м элементом, а второй столбец - строкой 'Значение' + i.

Мы также можем использовать массивы для заполнения StringGrid:

var 
  data: array[0..2, 0..1] of string = ( 
    ('1', 'Значение 1'), 
    ('2', 'Значение 2'), 
    ('3', 'Значение 3') 
  ); 

StringGrid1.RowCount := 3; 
for i := 0 to 2 do 
begin 
  StringGrid1.Cells[0, i] := data[i][0]; 
  StringGrid1.Cells[1, i] := data[i][1]; 
end;

Здесь мы объявляем массив данных и затем используем цикл for для заполнения StringGrid. По мере необходимости мы можем изменять RowCount StringGrid, чтобы подогнать его под количество строк в массиве.