Run;
Метод Run осуществляет выполнение .NET-сборки.
Примечание. Перед запуском сборки осуществляется компиляция сборки. Если во время компиляции возникают ошибки, то будет сгенерирована исключительная ситуация.
Для выполнения примера предполагается наличие в репозитории .NET-сборки с идентификатором "NETAssembly_1".
Sub UserProc;
Var
MB: IMetabase;
NETAssembly: IForeNETAssembly;
Arg: IForeNETMakeArgs;
s: String;
Begin
MB := MetabaseClass.Active;
NETAssembly := MB.ItemById("NETAssembly_1").Bind As IForeNETAssembly;
Arg := NETAssembly.CreateMakeArgs;
Arg.Messages := New StringList.Create;
If NETAssembly.IsUpToDate(True) Then
NETAssembly.Run;
Elseif NETAssembly.MakeUpToDate(Arg) Then
NETAssembly.Run;
Else
For Each s In Arg.Messages Do
Debug.WriteLine(s);
End For;
End If;
End Sub UserProc;
После выполнения примера будет осуществлена проверка наличия в кэше сборок последней компилированной версии указанной .NET-сборки. Если последняя версия присутствует, то сборка будет запущена из кэша сборок. Если последняя версия отсутствует, то будет осуществлена компиляция .NET-сборки и всех сборок, связанных с ней. Если компиляция прошла удачно, то сборка будет запущена, иначе в консоль среды разработки будет выведена информация об ошибках, возникших во время компиляции.
См. также: