MakeUpToDateD(Args: IForeNETMakeArgs): DateTime;
Args. Объект, в котором будет содержаться информация о результате компиляции сборки.
Метод MakeUpToDateD проверяет наличие в кэше сборок последней компилированной версии .NET-сборки и осуществляет компиляцию в случае ее отсутствия.
Метод возвращает дату и время последней компиляции. Если во время компиляции возникли какие-либо ошибки, то метод вернет значение даты: "30.12.1899 0:00:00". Список ошибок будет доступен в коллекции Args.Messages.
Для выполнения примера предполагается наличие в репозитории .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
Debug.WriteLine("Yes");
NETAssembly.Run;
Elseif NETAssembly.MakeUpToDateD(Arg).Year <> 1899 Then
NETAssembly.Run;
Else
For Each s In Arg.Messages Do
Debug.WriteLine(s);
End For;
End If;
End Sub UserProc;
После выполнения примера будет осуществлена проверка наличия в кэше сборок последней компилированной версии указанной .NET-сборки. Если последняя версия присутствует, то сборка будет запущена из кэша сборок. Если последняя версия отсутствует, то будет осуществлена компиляция .NET-сборки и всех сборок, связанных с ней. Если компиляция прошла удачно, то сборка будет запущена, иначе в консоль среды разработки будет выведена информация об ошибках, возникших во время компиляции.
См. также: