• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

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;
 
Мы в соцсетях:

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