Пользователь
Сообщения: 121 Благодарности: 7
Профиль | Отправить PM | Цитировать
for i := 1 to RowsCount do begin for j := 1 to RowsCount do begin sg1.cells[i - 1, j - 1] := excel.cells[j, i].Value;
Отправлено: 14:37, 21-04-2011 | #10