1C8 + Delphi загрузка документа ОприходованиеТоваров не получается
05.10.2010
20:42
#1
"OlePrihDoc:=Ole1C.Документы.ОприходованиеТоваров;
SelectPrihodDoc:=OlePrihDoc.Выбрать();
i:=1;
while SelectPrihodDoc.Следующий() do begin
PrihDocTab.RowCount:=PrihDocTab.RowCount+1;
PrihDocTab.Cells[0,i]:=TRim(SelectPrihodDoc.Номер);
PrihDocTab.Cells[1,i]:=TRim(SelectPrihodDoc.Дата);
Contrag:=SelectPrihodDoc.Контрагент;
PrihDocTab.Cells[4,i]:=Trim(Contrag.Код)+'.'+Trim(Contrag.Наименование);
i:=i+1;
end;
Переписываю экспорт из 1С7 на 1С8 в приложение на Delphi
Вот эта конструкция Contrag:=SelectPrihodDoc.Контрагент; не работает
Выдается ошибка что-то вроде "Нет такого метода". В 7 версии работало.
Как исправить?
"
SelectPrihodDoc:=OlePrihDoc.Выбрать();
i:=1;
while SelectPrihodDoc.Следующий() do begin
PrihDocTab.RowCount:=PrihDocTab.RowCount+1;
PrihDocTab.Cells[0,i]:=TRim(SelectPrihodDoc.Номер);
PrihDocTab.Cells[1,i]:=TRim(SelectPrihodDoc.Дата);
Contrag:=SelectPrihodDoc.Контрагент;
PrihDocTab.Cells[4,i]:=Trim(Contrag.Код)+'.'+Trim(Contrag.Наименование);
i:=i+1;
end;
Переписываю экспорт из 1С7 на 1С8 в приложение на Delphi
Вот эта конструкция Contrag:=SelectPrihodDoc.Контрагент; не работает
Выдается ошибка что-то вроде "Нет такого метода". В 7 версии работало.
Как исправить?
"
Читают тему
(гостей: 1)