Добавил возможность скрытия таблиц под шапку (#7)

thvvmas · Aug 17, 2021 · 38344c3 · 38344c3
1 parent 59dd213
commit 38344c3
Show file tree

Hide file tree

Showing 2 changed files with 22 additions and 2 deletions.
diff --git a/ERДиаграммаМетаданныхDrawIO/ERДиаграммаМетаданныхDrawIO.epf b/ERДиаграммаМетаданныхDrawIO/ERДиаграммаМетаданныхDrawIO.epf
diff --git a/ERДиаграммаМетаданныхDrawIO/ERДиаграммаМетаданныхDrawIO/Forms/Форма/Ext/Form/Module.bsl b/ERДиаграммаМетаданныхDrawIO/ERДиаграммаМетаданныхDrawIO/Forms/Форма/Ext/Form/Module.bsl
@@ -1235,6 +1235,11 @@
 		ЗаписьXML.ЗаписатьАтрибут("id"		, Строка(ЭлементКВыводу.id));
 		ЗаписьXML.ЗаписатьАтрибут("value"	, ЭлементКВыводу.value);
 		ЗаписьXML.ЗаписатьАтрибут("style"	, ЭлементКВыводу.style);
+
+		Если СкрытьТаблицыПодШапку И ЭлементКВыводу.shape = "table" Тогда
+			ЗаписьXML.ЗаписатьАтрибут("collapsed"	, "1");
+		КонецЕсли;
+
 		ЗаписьXML.ЗаписатьАтрибут("vertex"	, "1");
 
 		Если ЭлементКВыводу.shape = "table" Тогда
@@ -1247,9 +1252,24 @@
 		ЗаписьXML.ЗаписатьАтрибут("x"		, Формат(ЭлементКВыводу.x, "ЧН=0; ЧГ="));
 		ЗаписьXML.ЗаписатьАтрибут("y"		, Формат(ЭлементКВыводу.y, "ЧН=0; ЧГ="));
 		ЗаписьXML.ЗаписатьАтрибут("width"	, Формат(ЭлементКВыводу.width, "ЧН=0; ЧГ="));
-		ЗаписьXML.ЗаписатьАтрибут("height"	, Формат(ЭлементКВыводу.height, "ЧН=0; ЧГ="));
 		ЗаписьXML.ЗаписатьАтрибут("as"		, "geometry");
-		ЗаписьXML.ЗаписатьКонецЭлемента();
+
+		Если СкрытьТаблицыПодШапку И ЭлементКВыводу.shape = "table" Тогда
+			ЗаписьXML.ЗаписатьАтрибут("height"	, Строка(ВысотаСтрок));
+
+			ЗаписьXML.ЗаписатьНачалоЭлемента("mxRectangle");
+			ЗаписьXML.ЗаписатьАтрибут("x"		, Формат(ЭлементКВыводу.x, "ЧН=0; ЧГ="));
+			ЗаписьXML.ЗаписатьАтрибут("y"		, Формат(ЭлементКВыводу.y, "ЧН=0; ЧГ="));
+			ЗаписьXML.ЗаписатьАтрибут("width"	, Формат(ЭлементКВыводу.width, "ЧН=0; ЧГ="));
+			ЗаписьXML.ЗаписатьАтрибут("height"	, Формат(ЭлементКВыводу.height, "ЧН=0; ЧГ="));
+			ЗаписьXML.ЗаписатьАтрибут("as"		, "alternateBounds");
+
+			ЗаписьXML.ЗаписатьКонецЭлемента(); // mxRectangle
+		Иначе
+			ЗаписьXML.ЗаписатьАтрибут("height"	, Формат(ЭлементКВыводу.height, "ЧН=0; ЧГ="));
+		КонецЕсли;
+
+		ЗаписьXML.ЗаписатьКонецЭлемента(); // mxGeometry
 
 		ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell