В связи с обнаружением такой супер универсальной функциональности
StdMenuTool.UpdateFromText вопрос снимается с повестки. Желающие могут писать свои фильтры по объединению файлов меню, и передавать результат в эту процедуру самостоятельно. Просто замечательная новость. ББ не перестаёт радовать продуманностью деталей.
Код:
MODULE TestMenus;
IMPORT Files, Views, StdMenuTool, TextModels, TextViews;
PROCEDURE LoadFromFile* (path, name: ARRAY OF CHAR);
VAR text: TextModels.Model; view: Views.View;
BEGIN
view := Views.OldView(Files.dir.This(path), name$);
WITH view: TextViews.View DO
StdMenuTool.UpdateFromText(view.ThisModel())
ELSE END
END LoadFromFile;
END TestMenus.
"TestMenus.LoadFromFile('Mod/Rsrc/ME', 'Menus_MOD.odc')"
"TestMenus.LoadFromFile('Mod/Rsrc/ME', 'Menus_SIM.odc')"
"TestMenus.LoadFromFile('System/Rsrc', 'Menus.odc')"