• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

    На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.

    Запись на курс до 25 апреля. Получить промодоступ ...

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

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