copyAdvStringGrid

var //AION シエル RMT
rowIdx, colIdx: Integer;
begin
dest.ColCount := src.ColCount;
dest.RowCount := src.RowCount;
for colIdx := 0 to src.ColCount - 1 do
begin
for rowIdx := 0 to src.RowCount - 1 do
begin
dest.Cells[colIdx, rowIdx] := src.Cells[colIdx, rowIdx];
end;
end;