Метод UpdateComplete (Объект IIngeoDbSysObjectsSink)

Синтаксис

Язык	Описание
VBScript, JavaScript	SubUpdateComplete(aSysObjectType, aSysObject, aMy)
Visual Basic	Sub UpdateComplete(ByVal aSysObjectType As TIngeoSysObjectType, ByVal aSysObject As Object, ByVal aMy As Boolean)
Delphi	procedure UpdateComplete(aSysObjectType: TIngeoSysObjectType; aSysObject: IDispatch; aMy: WordBool);
C, C++	HRESULT UpdateComplete(TIngeoSysObjectType aSysObjectType, IDispatch aSysObject, VARIANT_BOOL aMy);

Параметры

aSysObjectType

Тип системного объекта.

aSysObject

Системный объект.

aMy

Признак того, что данное событие возникло в результате выполнения операции в том процессе ИнГео, в котором выполняется модуль расширения.

Пример

sub DBSysObjects_WillUpdate(aSysObjectType, aSysObject)
if aSysObjectType = 0 then
MsgBox "Территория с именем " & aSysObject.Name
end if
aSysObject.Name = "Новое имя территории"
end sub
sub DBSysObjects_UpdateComplete(aSysObjectType, aSysObject)
if aSysObjectType = 0 then
MsgBox "Территория с новым именем " & aSysObject.Name
end if
end sub