OberonCore :: - Открыть документ из файла в режиме ред-я

StdCmds.OpenBrowser
StdApi.OpenBrowser
   StdApi.PathToSpec - подбор пути с учётом языка Dialog.language
   loc.res := 77
   Views.OldView
      VAR conv: Converters.Converter
      conv := NIL
      Views.Old
         viewHook.OldView -> Views.SetViewHook -> StdDialog
            StdDialog.PROCEDURE (h: ViewHook) OldView
               loc.res = 77 -> не выполняется поиск среди имеющихся окон, а сразу:
               Converters.Import(loc, name, conv, s) -> подбирает конвертер по типу файла, если conv = NIL
   StdDialog.Open(v, t, NIL, "", NIL, FALSE, TRUE, FALSE, TRUE, FALSE)

Автор:	Евгений Темиргалеев [ Четверг, 10 Сентябрь, 2009 16:37 ]
Заголовок сообщения:	Открыть документ из файла в режиме ред-я
Как понимаю: - StdCmds.OpenBrowser открывает документ именно из указанного файла, в режиме просмотра; - StdCmds.OpenDoc либо подсовывает уже открытый документ, либо открывает из файла, в режиме редактирования. Нужна команда, которая открывает из файла, не подсовывая уже открытое, в режиме редактирования. Подскажите, пожалуйста, товарищи! Голова под вечер не варит... а делается, может, в пару строчек...

Автор:	Info21 [ Четверг, 10 Сентябрь, 2009 16:39 ]
Заголовок сообщения:	Re: Открыть документ из файла в режиме ред-я
Стоит посмотреть Views.Open --- Да, правильно, хотел сказать Views.Old, пардон.

Автор:	Евгений Темиргалеев [ Четверг, 10 Сентябрь, 2009 19:20 ]
Заголовок сообщения:	Re: Открыть документ из файла в режиме ред-я
Хотелось бы и заголовок окна свой, и чтобы конвертер подбирался по типу файла автоматом... Поглядел по исходникам, как OpenBrowser работает: Код: StdCmds.OpenBrowser StdApi.OpenBrowser StdApi.PathToSpec - подбор пути с учётом языка Dialog.language loc.res := 77 Views.OldView VAR conv: Converters.Converter conv := NIL Views.Old viewHook.OldView -> Views.SetViewHook -> StdDialog StdDialog.PROCEDURE (h: ViewHook) OldView loc.res = 77 -> не выполняется поиск среди имеющихся окон, а сразу: Converters.Import(loc, name, conv, s) -> подбирает конвертер по типу файла, если conv = NIL StdDialog.Open(v, t, NIL, "", NIL, FALSE, TRUE, FALSE, TRUE, FALSE) Converters.Import подбирает конвертер и загружает --- открытая (не private module of BlackBox). А открытой процедуры, которой можно задать заголовок, и скормить результаты Converters.Import, кажется нету... P.S. и оффтоп --- про обероны и среды... Достаточно всего лишь в языке: вызов процедуры ТОЛЬКО через QualIdent, а в среде команды "показать исходник" и "показать документацию" по выделенному QualIdent. И все --- любые исходники, завязанные на обычные поцедуры, раскапываются мгновенно... Вспоминаю копание в дельфийских да сишных библиотеках --- ужос...

OberonCore https://forum.oberoncore.ru/

Открыть документ из файла в режиме ред-я https://forum.oberoncore.ru/viewtopic.php?f=24&t=1825	Страница 1 из 1

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