Скопировать объект из класса источника
procedure MergeObject(oSource: TMapObjectStructure; flClearSource: boolean = true);