Manuelle Kopieren der Blöcke von BTMTBeladung auf BTMTEntladung im Code der Main_SSG.rdx

This commit is contained in:
Simon Schmutzler
2024-02-09 10:03:20 +01:00
parent e4256b550b
commit e6761c0c8a
+126 -2
View File
@@ -73,6 +73,12 @@
<FIELD Id="RDK:1657744" Name="Beschreibung" Type="string" />
<FIELD Id="RDK:1652524" Name="Durchmesser" Type="double" Suppressed="True" />
</TYPE>
<TYPE Id="RDK:16525251" Name="BTMTEntladungType" Expanded="True" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:16525221" Name="Hoehe" Type="double" />
<FIELD Id="RDK:16525231" Name="Drehung" Type="integer" DesignTimeNotes="1= im Uhrzeigersinn=rechts&#xD;&#xA;-1= Gegen Uhrzeigersinn=links" />
<FIELD Id="RDK:16577441" Name="Beschreibung" Type="string" />
</TYPE>
<TYPE Id="RDK:79642" Name="SSG_ShapeType" Expanded="True" SubType="structure">
<TYPE_VALUES />
<FIELD Id="RDK:79643" Name="SivasNummer" Type="string" />
@@ -83,6 +89,7 @@
<FIELD Id="RDK:412309" Name="GefaelleDefinition" Type="GefaelleType" />
<FIELD Id="RDK:973719" Name="WeicheDefinition" Type="WeicheType" />
<FIELD Id="RDK:1652536" Name="BTMTBeladungDefinition" Type="BTMTBeladungType" />
<FIELD Id="RDK:16525361" Name="BTMTEntladungDefinition" Type="BTMTEntladungType" />
</TYPE>
<TYPE Id="RDK:1783792" Name="SSGParameter" SubType="structure" HasArrayType="True">
<TYPE_VALUES />
@@ -705,6 +712,10 @@
<TYPE_VALUES />
<FIELD Id="RDK:1668591" Name="Höhe in m" Type="string" Suppressed="True" />
</TYPE>
<TYPE Id="RDK:16685851" Name="BTMTEntladungMerkmaleType" Expanded="True" SubType="structure" DesignTimeNotes="{ &quot;Abstand (Kreiselachse A - Kreiselachse) in Meter&quot;: &quot;4.5&quot;, &quot;Anzahl der Separatoren&quot;:&quot;2&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Scanner&quot;:&quot;1&quot;, &quot;Anzahl der Weichen&quot;: &quot;4&quot; }">
<TYPE_VALUES />
<FIELD Id="RDK:16685911" Name="Höhe in m" Type="string" Suppressed="True" />
</TYPE>
</GROUP>
<TYPE Id="RDK:1007393" Name="Point2D" SubType="structure" HasArrayType="True">
<TYPE_VALUES />
@@ -769,6 +780,7 @@
<VAR Id="RDK:1520435" Name="EckradData_defaults" Type="EckradType" />
<VAR Id="RDK:837487" Name="GefaelleData_defaults" Type="GefaelleType" />
<VAR Id="RDK:1652538" Name="BTMTBeladungData_defaults" Type="BTMTBeladungType" />
<VAR Id="RDK:16525381" Name="BTMTEntladungData_defaults" Type="BTMTEntladungType" />
<GROUP Id="RDK:93797" Name="Background" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:382" Name="ImportBackgroundData" Type="ImportBackgroundType" />
</GROUP>
@@ -785,9 +797,11 @@
<VAR Id="RDK:426767" Name="KreiselData" Type="KreiselType" />
<VAR Id="RDK:1520551" Name="EckradData" Type="EckradType" />
<VAR Id="RDK:1810763" Name="BTMTBeladungData" Type="BTMTBeladungType" />
<VAR Id="RDK:18107631" Name="BTMTEntladungData" Type="BTMTEntladungType" />
<VAR Id="RDK:397366" Name="Render_Kreisel" Type="MUIPanelType[]" />
<VAR Id="RDK:1545832" Name="Render_Eckrad" Type="MUIPanelType[]" />
<VAR Id="RDK:1810765" Name="Render_BTMTBeladung" Type="MUIPanelType[]" />
<VAR Id="RDK:18107651" Name="Render_BTMTEntladung" Type="MUIPanelType[]" />
<VAR Id="RDK:397368" Name="Render_Gefaelle" Type="MUIPanelType[]" />
<VAR Id="RDK:973744" Name="Render_Weiche" Type="MUIPanelType[]" />
<VAR Id="RDK:532690" Name="Render_CP" Type="MUIPanelType[]" />
@@ -1490,6 +1504,7 @@
<PAR Name="Rotationsklasse" />
<PAR Name="IDCounter" />
<PAR Name="BTMTBeladungDefinition" />
<PAR Name="BTMTEntladungDefinition" />
</SET_STRUCT>
<REMOVE_ADD Id="RDK:639233" Suppressed="True" ListRef="ShapeList" Expr="Me.behaviour=&quot;(BACKGROUND)&quot;">
<EXP />
@@ -3104,6 +3119,59 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
<PAR Name="eventHandlers" />
</SET_STRUCT>
</FUNCTION>
<FUNCTION Id="RDK:16531101" Name="CreatePrototype_BTMTEntladung">
<GROUP Id="RDK:16531061" Name="Local Variables" SubType="VarSet" IncludeDate="0" />
<COMMENTS Id="RDK:16531071" DesignTimeRemark="Angle definition in GS2D" DesignTimeNotes=" 0&#xD;&#xA; |&#xD;&#xA;270 &lt;-------&gt;90&#xD;&#xA; |&#xD;&#xA; 180&#xD;&#xA;" />
<SET Id="RDK:16531081" VarRef="Property_Prototype">
<EXP><![CDATA[$=$Shape_Prototype]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET_STRUCT Id="RDK:16531091" VarRef="Property_Prototype">
<PAR Name="id" />
<PAR Name="name" />
<PAR Name="family" />
<PAR Name="description" />
<PAR Name="text" />
<PAR Name="shapeMode" />
<PAR Name="icon" />
<PAR Name="iconBig" />
<PAR Name="image" />
<PAR Name="srcSVG" />
<PAR Name="src3D" />
<PAR Name="srcTexture3D" />
<PAR Name="width">
<EXP><![CDATA[$=$ConvertToPixel(Property_Prototype.width, "mm", 96)]]></EXP>
</PAR>
<PAR Name="height">
<EXP><![CDATA[$=$ConvertToPixel(Property_Prototype.height, "mm", 96)]]></EXP>
</PAR>
<PAR Name="depth">
<EXP><![CDATA[$=$ConvertToPixel(Property_Prototype.depth, "mm", 96)]]></EXP>
</PAR>
<PAR Name="behaviour" />
<PAR Name="help" />
<PAR Name="eventClass" />
<PAR Name="linkClass" />
<PAR Name="collisionClass" />
<PAR Name="containerClass" />
<PAR Name="snapClass" />
<PAR Name="color" />
<PAR Name="colorOpacity" />
<PAR Name="lineColor" />
<PAR Name="lineColorOpacity" />
<PAR Name="color3D" />
<PAR Name="colorOpacity3D" />
<PAR Name="lineColor3D" />
<PAR Name="lineColorOpacity3D" />
<PAR Name="custom" />
<PAR Name="connectionPoints" />
<PAR Name="group2dShapes" />
<PAR Name="group2dConnectors" />
<PAR Name="group3d" />
<PAR Name="eventHandler" />
<PAR Name="eventHandlers" />
</SET_STRUCT>
</FUNCTION>
<FUNCTION Id="RDK:439270" Name="Create/Update Shape">
<GROUP Id="RDK:439268" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:439269" Name="ID" Type="string" />
@@ -3367,6 +3435,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
<PAR Name="GefaelleDefinition" />
<PAR Name="WeicheDefinition" />
<PAR Name="BTMTBeladungDefinition" />
<PAR Name="BTMTEntladungDefinition" />
<PAR Name="source">
<EXP><![CDATA[$=$IIF(Shape_Prototype.EckradDefinition.Drehung=1,"Eckrad_Rechts","Eckrad_Links")]]></EXP>
</PAR>
@@ -8628,6 +8697,7 @@ Contains(IndirectConnKreiselList, Link) AND Shape_Prototype.family = "Gefaellest
<PAR Name="GefaelleDefinition" />
<PAR Name="WeicheDefinition" />
<PAR Name="BTMTBeladungDefinition" />
<PAR Name="BTMTEntladungDefinition" />
<PAR Name="source" />
<PAR Name="sourceLibrary" />
<PAR Name="signature" />
@@ -9859,6 +9929,7 @@ me.x
<VAR Id="RDK:1516846" Name="WeicheMerkmale" Type="WeicheMerkmaleType" />
<VAR Id="RDK:1666873" Name="EckradMerkmale" Type="EckradMerkmaleType" />
<VAR Id="RDK:1668589" Name="BTMTBeladungMerkmale" Type="BTMTBeladungMerkmaleType" />
<VAR Id="RDK:1668589" Name="BTMTEntladungMerkmale" Type="BTMTEntladungMerkmaleType" />
<VAR Id="RDK:1516847" Name="CSVFileName" Type="string" />
<VAR Id="RDK:1516848" Name="CSVFile" Type="string" />
</GROUP>
@@ -10093,8 +10164,51 @@ me.x
</GROUP>
<LIST_ADD Id="RDK:1663399" ListRef="CSV_List">
<PAR Name="VALUE_TO_ADD">
<EXP><![CDATA[$=$CSV_Item
]]></EXP>
<EXP><![CDATA[$=$CSV_Item]]></EXP>
</PAR>
<PAR Name="POS_TO_ADD" />
</LIST_ADD>
</CASEGROUP>
<CASEGROUP Id="RDK:16634001" CaseType="0">
<EXP><![CDATA[$C$BTMTEntladung]]></EXP>
<GROUP Id="RDK:16633911" Name="TeileArt" SubType="Generic">
<SET Id="RDK:16633901" VarRef="CSV_Item.TeileArt">
<EXP><![CDATA[$=$ToJSON("BT - Entladung")]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:16633931" Name="Bezeichnung" SubType="Generic">
<SET Id="RDK:16633921" VarRef="CSV_Item.Bezeichnung">
<EXP><![CDATA[$=$ToJSON(ShapeItem.BTMTEntladungDefinition.Beschreibung)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:16633951" Name="Planquadrat" SubType="Generic">
<CALLFUNCTION Id="RDK:16633941">
<PAR Name="FuncName">
<EXP><![CDATA[$C$GetPlanquadratPosition]]></EXP>
</PAR>
<PAR Name="InputExp" />
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<GROUP Id="RDK:16685721" Name="Merkmale" SubType="Generic">
<SET_STRUCT Id="RDK:16685871" VarRef="BTMTEntladungMerkmale" ClearAll="True">
<PAR Name="Höhe in m">
<EXP><![CDATA[$C$5]]></EXP>
</PAR>
</SET_STRUCT>
<SET Id="RDK:16685811" VarRef="CSV_Item.Merkmale">
<EXP><![CDATA[$=$ToJSON(BTMTEntladungMerkmale)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<LIST_ADD Id="RDK:16633991" ListRef="CSV_List">
<PAR Name="VALUE_TO_ADD">
<EXP><![CDATA[$=$CSV_Item]]></EXP>
</PAR>
<PAR Name="POS_TO_ADD" />
</LIST_ADD>
@@ -13549,6 +13663,16 @@ ShapeList["id="+Param.Input[1].shapeID].name
</PAR>
</SET_STRUCT>
</GROUP>
<GROUP Id="RDK:16532461" Name="BTMTEntladung" SubType="Generic">
<SET_STRUCT Id="RDK:1653245" VarRef="BTMTEntladungData_defaults" ClearAll="True">
<PAR Name="Hoehe">
<EXP><![CDATA[$C$2000]]></EXP>
</PAR>
<PAR Name="Drehung">
<EXP><![CDATA[$C$1]]></EXP>
</PAR>
</SET_STRUCT>
</GROUP>
</GROUP>
<GROUP Id="RDK:326" Name="UI" SubType="Generic">
<WHILELOOP Id="RDK:328">