IMetabaseCustomObjectWriter.WriteFromStream

Синтаксис

WriteFromStream(Stream: IIOStream);

Параметры

Stream - поток, из которого будут получены данные для записи.

Описание

Метод WriteFromStream осуществляет запись данных в объект из потока.

Пример

Для выполнения примера предполагается наличие в репозитории объекта пользовательского класса с идентификатором «OBJ_CUSTOM». Также предполагается наличие файла «C:\Stream.txt».

Sub Main;

Var

Mb: IMetabase;

Object: IMetabaseObject;

CustomObject: IMetabaseCustomObject;

Writer: IMetabaseCustomObjectWriter;

Reader: IMetabaseCustomObjectReader;

Stream: IIOStream;

i: Integer;

Begin

Mb := MetabaseClass.Active;

Object := Mb.ItemById("OBJ_CUSTOM").Edit;

CustomObject := Object As IMetabaseCustomObject;

Stream := New MemoryStream.Create;

For i := 65 To 90 Do

Stream.WriteByte(i);

End For;

Stream.Position := 0;

Writer := CustomObject.CreateWriter;

Writer.WriteFromStream(Stream);

Writer.Save;

Reader := CustomObject.CreateReader;

Reader.Load;

Reader.ReadToFile("C:\Stream.txt");

Object.Save;

End Sub Main;

После выполнения примера в объект будут записаны и сохранены данные из созданного потока, затем эти данные будут выгружены в файл «C:\Stream.txt».

См. также:

IMetabaseCustomObjectWriter