• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Ole. Работа со справочниками 1С из Delphi

  • Автор темы emelin
  • Дата начала
E

emelin

Необходимо осуществить перенос данных из базы Sql Server в 1С.
Связываюсь с 1С по OLE.
Новые записи добавляются отлично:
Код:
OleEmployer := Ole1C.CreateObject('Справочник.Сотрудники');
OleEmployer.New;
OleEmployer.Код := '111';
OleEmployer.Наименование := 'ааа';
OleEmployer.Write;
Вопрос, как производить обновление реквизитов объектов?

Пробовала делать следующее:
Код:
OleEmployer.FindByCode('111');
if OleEmployer.Selected then 
begin
tOleEmployer := OleEmployer.CurrentItem;
tOleEmployer.Наименование := 'bbb';
tOleEmployer.Write;
end;
Ошика: 'не выбран элемент!'. Как выбрать элемент?
 
E

emelin

Все, вопрос решен!
Код:
OleEmployer.FindByCode('111');
if OleEmployer.Selected then
begin
tOleEmployer.НайтиЭлемент(OleEmployer);
tOleEmployer.Наименование := 'bbb';
tOleEmployer.Write;
end;
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!