BOMat = CREATEOBJECT("Materials.BOSimpleProvider")

BOMat.GetObjectInfo(Location,ClassID,ObjectID)

BOMat.ExecuteRequest
BOMat.GetObject
BOMat.GetObjects
BOMat.Refresh
BOMat.RegisterClient
BOMat.UnregisterClient

(BOMat.Status)
(BOMat.ClientID)
(BOMat.Request)
(BOMat.Response)
(BOMat.SourceID)

Method ExecuteRequest() As Void
Method GetObject(ClassID As String, ObjectID As String, Options As Long) As IBOObject
Method GetObjectInfo(Location As String, ClassID As String, ObjectID As String) As Void
Method GetObjects(ClassID As String, Options As Long) As IBOObjectCollection
Member of BOSimple.IBOSimpleProvider
Method Refresh() As Void
Method RegisterClient(aName As String) As Void
Method Select(Modal As Logical, Location As String, ClientWindow As Long) As Logical
Method UnRegisterClient() As Void

begin
  wstLocation := '';
  BOMat.Select(TRUE, // true - модальное окно выбора обьекта, false - не модальное.
                wstLocation, // Location обьекта
                Handle);   // указатель окна МиС
  BOMat.GetObjectInfo( wstLocation, ClassID, ObjectID );// запрос "Получить информацию об обьете"
  BOMat.Request.Topic := topicProperties;               // Заголовок запроса (см. BOMatConst)
  BOMat.Request.Attribute[ anAction ].AsString := avGet;   //Атрибут запроса на получение свойств (см. BOMatConst)
  BOMat.Request.Attribute[ anClassID ].AsString := ClassID;  // Атрибут запроса ClassID
  BOMat.Request.Attribute[ anObjectID ].AsString := ObjectID;  // Атрибут запроса ObjectID
  BOMat.ExecuteRequest;
  edSelectedObject.Text := BOMat.Response.Item[ 0 ].DisplayName + ' класса ' +
                             BOMat.Response.Item[ 0 ].ClassID;
  _ParseObjects( BOMat.Response, nil); // Парсим полученную коллекцию обьектов и атрибутов.
end;

BOMat.Request.Attribute[ anAction ].AsString := avGet;

BOMat = CREATEOBJECT('Materials.BOSimpleProvider')
  wstLocation = ''
  ClassID=''
  ObjectID=''
  TRUE=.t.
tt=BOMat.Select(.t., wstLocation, thisform.HWnd)
вылетает в ошибку "Access violation at adress 00404BE8 in module 'Materials.exe'. Write of adress 0000083C"

wstLocation := '';
  BOMat.Select(TRUE, // true - модальное окно выбора обьекта, false - не модальное.
                wstLocation, // Location обьекта
                Handle);   // указатель окна МиС