IsExternal: Boolean;
Свойство IsExternal определяет признак соответствия внешней сборке.
Если свойству установлено значение True, то в данную .NET-сборку загружена внешняя сборка.
Для выполнения примера предполагается наличие в корневом каталоге диска «С» файла «UserFunc.dll», полученного в результате компиляции какой-либо сборки.
Sub UserProc;
Var
MB: IMetabase;
CrInfo: IMetabaseObjectCreateInfo;
Assembly: IMetabaseObject;
NETAssembly: IForeNETAssembly;
Begin
MB := MetabaseClass.Active;
CrInfo := MB.CreateCreateInfo;
CrInfo.ClassID := MetabaseObjectClass.KE_CLASS_NETASSEMBLY;
CrInfo.Name := "UserFunc";
CrInfo.Id := "ExtAssembly";
CrInfo.Parent := MB.Root;
Assembly := MB.CreateObject(CrInfo).Edit;
Assembly.Save;
NETAssembly := Assembly As IForeNETAssembly;
NETAssembly.LoadExternal("c:\UserFunc.dll");
NETAssembly.IsExternal := True;
Assembly.Save;
End Sub UserProc;
После выполнения примера в корневом каталоге репозитория будет создана новая .NET-сборка. В данную сборку будет загружена внешняя сборка, содержащаяся в файле "UserFunc.dll".
См. также: