> -- Valery Solovey писал(а):
> По крайней мере, в седьмой винде путь к домашней директории можно получить из переменной окружения %USERPROFILE%

Получается, если воспользоваться вашиммодулем Env, то все достаточно просто. Спасибо.

## Код:
```
MODULE DiaRegTest;
   
   IMPORT SYSTEM, Log, Files, Env, Views, HostEnv, Converters;

   PROCEDURE Home*(): Files.Locator;
   BEGIN
      RETURN Files.dir.This(Env.Get("USERPROFILE"))
   END Home;

   PROCEDURE Do*;
   VAR loc: Files.Locator; name: Files.Name; conv: Converters.Converter; v: Views.View;
   BEGIN
      loc := Home();
      name := "";
      v := Views.Old(Views.ask, loc, name, conv);
      IF v # NIL THEN
         Views.OpenView(v)
      END;
   END Do;

END DiaRegTest.
```
