IResourceImporter.Log

Syntax

Description

The Log property returns the report about the resource import process.

Example

Executing the example requires that the repository contains resources with the RESOURCES identifier. There also should be a file, into which the C:\Res.txt resource was exported.

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

ImpObj: ResourceImporter;

Prov: DtTextProvider;

ResObj: IResourceObject;

CountrysArr: Array[0..1] Of String;

Log: IResourceImporterLog;

i: Integer;

s: String;

Begin

Prov := New DtTextProvider.Create;

ImpObj := New ResourceImporter.Create;

MB := MetabaseClass.Active;

MObj := MB.ItemById("RESOURCES").Edit;

ResObj := MObj As IResourceObject;

Prov.File := "C:\Res.txt";

Prov.RangeHasHeader := True;

ImpObj.Provider := Prov;

CountrysArr[0] := "ru";

CountrysArr[1] := "en";

ImpObj.Locales := CountrysArr;

ImpObj.Resource := ResObj;

ImpObj.Method := ResourceImportType.UpdateAndAdd;

ImpObj.Import;

Log := ImpObj.Log;

Debug.WriteLine("Altogether " + Log.Count.ToString + " records");

For i := 0 To Log.Count - 1 Do

Select Case log.State(i).ToString

Case "0": s := " - record added";

Case "1": s := " - record updated";

Case "2": s := " - record passed";

End Select;

Debug.WriteLine(Log.Item(i) + s);

End For;

End Sub Main;

After executing the example resources are imported from the C:\Res.txt file. The elements missing in the current resources are imported, and existing elements values are updated. Information about import process is displayed in the console window.