Хочу сделать синхронизацию между двумя базами. Не как через OLE не могу утановить Родителя.
Почему не работает примерно такой код:
Если OleBase.НайтиПоКоду(КодСп1,0)= 1 Тогда
Если OleBase1.НайтиПоКоду(КодСп1,0)= 1 Тогда
OleBase.Родитель = OleBase1.ТекущийЭлемент(); << тут ошибка.

Родитель не меняется. Изменяется только код родителя. А мне надо что бы изменился родитель.

Делаю я на Delhi:

Ole1CTorg :=   CreateOleObject('V77.Application');
Ole1CTorg.Initialize(Ole1CTorg.RMTrade, '/D' + OlePach.Text + ' /N' + OleLogin.Text + ' /P' + OlePass.Text,'NO_SPLASH_SHOW');
Ole1Cbase :=   CreateOleObject('V77.Application');
Ole1Cbase.Initialize(Ole1Cbase.RMTrade, '/D' + OlePach1.Text + ' /N' + OleLogin1.Text + ' /P' + OlePass1.Text,'NO_SPLASH_SHOW');

OleNomenklaturaBase:= Ole1Cbase.EvalExpr('СоздатьОбъект("Справочник.Номенклатура")');
OleNomenklaturaTorg1 := Ole1CTorg.EvalExpr('СоздатьОбъект("Справочник.Номенклатура")');

OleNomenklaturaTorg1.selectitems(1); //Открываем выборку элементов справочника
while OleNomenklaturaTorg1.GetItem(1)>0 do //Выбираем все элементы
  begin

     codeid :=   OleNomenklaturaTorg1.Code ; //Запишем в переменную код
     Application.ProcessMessages;

       if Stop = 1 then
         Break;


       if  (OleNomenklaturaTorg1.IsGroup = 0)  or (OleNomenklaturaTorg1.Level >= 2) then
     begin //Если это элемент и она на втором или более уровне…
        if OleNomenklaturaBase.FindByCode( codeid,0) = 1 then //Найдем в другой базе этот элемент.
           begin
try



                  Application.ProcessMessages;
        sListBox1.Items.Add(codeid + 'Было: ' +  OleNomenklaturaTorg1.FullDescr   );
      OleNomenklaturaBase.Parent.code  :=  OleNomenklaturaTorg1.Parent.Code; //Изменим родителя…

         OleNomenklaturaBase.Write;  //Записать
     sListBox1.Items.Add(OleNomenklaturaBase.Код + 'Стало: ' +  OleNomenklaturaBase.FullDescr   )  ;

end;
end;

Надо было передавать родителя из той же базы.... а не из торговли
Альфу большое спасибо (ответил по ICQ), и вам тоже, огромное спасибо за быстрый ответ!

хе. можно было и новый уникальный код назначить - тоже всё заработало бы.
а без уникальности - нафиг этот код вообще нужен? посмотри теперь на синхренизированные таким образом элементы