если я не ошибаюсь...:
Код:
Sheet.getCellByPosition(9,k).Setvalue(strtoint(copy(PanesCells[Panes.RecNo],1,pos(',',PanesCells[Panes.RecNo]+',')-1)));
delete(PanesCells[Panes.RecNo],1,pos(',',PanesCells[Panes.RecNo])+1);
offers_table.dataset.locate('ID',panes['OID'].asinteger,0);
Sheet.getCellByPosition(9,k).SetString(offers_table['PartName'].asstring);