> -- Хохулин Олег писал(а):
> Не могу разобраться с сохранением данных в ББ, может кто-то может привести "детский" пример с store.stores.Stores.Store -- это уже не по-детски.

Возможно, Вы хотите вот такого (создаем новый файл, записывает туда число, сохраняем, снова открываем, читаем это число; переменной n 100 нигде не присваивается, но будет напечатано в рабочий журнал именно 100, проверьте):

## Код:
```
MODULE x;
   IMPORT  Log := StdLog, Files, Stores;
   
   PROCEDURE ex;
      VAR loc: Files.Locator;  f: Files.File;  wr: Stores.Writer;  rd: Stores.Reader;
         n, res: INTEGER;
   BEGIN
      loc := Files.dir.This(''); (*рабочая папка*)
      f := Files.dir.New( loc, FALSE ); (*новый файл в папке loc*)
      wr.ConnectTo( f ); (*подсоеднили объект записи*)
      wr.WriteInt( 100 ); (*пишем туда целое в двоичном виде*)
      wr.ConnectTo( NIL ); (*для порядка отсоединились*)
      f.Register('имя файла', '', Files.dontAsk, res); (*зафиксировали файл с указанным именем*)
      
      f := Files.dir.Old( loc, 'имя файла', FALSE ); (*открыли снова файл с этим именем в папке loc*)
      rd.ConnectTo( f ); (*подсоединили объект чтения*)
      rd.ReadInt( n ); (*считываем целое в переменную n*)
      Log.Int( n ); (*печатаем в рабочий журнал -- убеждаемся, что 100*)
   END ex;


BEGIN ex
END x.
```


Выполнять: Ctrl+F9 в сборках от И-21.