26.10.2011, 02:34
|
|
Модератор
|
|
Регистрация: 17.04.2008
Сообщения: 8,107
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
|
|
Ну что сложного-то...
Код:
... // Открываем датасет, эксель, циклы...
DataModule1.Otchet_o_prieme.Append;
DataModule1.Otchet_o_prieme.FieldByName('Naimenovanie_tovara').AsString := Sheet.Cells[index,1];
...
DataModule1.Otchet_o_prieme.Post;
...// и поехали дальше, пока не вставим всю таблицу... |