OberonCore
https://forum.oberoncore.ru/

B25: DevBrowser.ImportSymFile & ImportCodeFile выдают Docume
https://forum.oberoncore.ru/viewtopic.php?f=116&t=2853
Страница 1 из 1

Автор:  Евгений Темиргалеев [ Среда, 15 Сентябрь, 2010 18:55 ]
Заголовок сообщения:  B25: DevBrowser.ImportSymFile & ImportCodeFile выдают Docume

DevBrowser.ImportSymFile & ImportCodeFile выдают Documents.Document

Регистрируются как "открывальщики" TextViews.View
Код:
      Converters.Register("DevBrowser.ImportSymFile", "", "TextViews.View", "osf", {});
      Converters.Register("DevBrowser.ImportCodeFile", "", "TextViews.View", "ocf", {});
А сами выдают Documents.Document (вызывают процитированные процедуры)
Код:
         v := TextViews.dir.New(buf);
         v.SetDefaults(NewRuler(), TextViews.dir.defAttr);
         title := mod$;
         view := Documents.dir.New(v, width, height)
      END;
      ...
   END DevBrowser.Browse;
...

        v := TextViews.dir.New(text);
        v.SetDefaults(NewRuler(), TextViews.dir.defAttr);
        view := Documents.dir.New(v, width, height);
        ...
    END DevBrowser.ReadHeader;

Страница 1 из 1 Часовой пояс: UTC + 3 часа
Powered by phpBB® Forum Software © phpBB Group
https://www.phpbb.com/