rowIdx, colIdx: Integer; //yahoo begin //aion rmt 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;