Gruppenfunktionen hinzugefügt

This commit is contained in:
2024-09-10 17:27:07 +02:00
parent df42a1b950
commit 7e191f2308
+158 -4
View File
@@ -1,6 +1,6 @@
<?xml version="1.0" encoding="utf-8"?>
<PROCESS Id="RDK:0001" Name="MAIN_SSG" ModernUI="True" Options="(GITSAVEMODE)(NOUPDATEINCLUDEFILES)" Expanded="True">
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="dvr [NBDELP3570-02C]" ModDate="2024-09-10T15:40:54" LanguageVersion="2014.1.3.688" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="m.stangl [ENTW-NB08]" ModDate="2024-09-10T17:24:34" LanguageVersion="2014.1.3.635" />
<GROUP Id="RDK:0002" Name="Declarations" SubType="Declarations" Expanded="True">
<GROUP Id="RDK:0003" Name="Types" SubType="TypeSet" IncludeDate="0">
<GROUP Id="RDK:26387" Name="SSG_Group" SubType="TypeSet" IncludeDate="0">
@@ -765,7 +765,7 @@
<FIELD Id="RDK:1516706" Name="Planquadrat" Type="string" DesignTimeNotes="Planquadrat ist die Position des Objekts auf der 2D Ebene. Wurde kein Planquadrat definiert, sollen einfach die X/Y Koordinaten des Objekts ausgegeben werden" />
<FIELD Id="RDK:1516707" Name="Merkmale" Type="string" DesignTimeNotes="Merkmale sind die vom Nutzer angegebenen Merkmale dieses Objeks, Z.B. Abstand der Motor zur Spannstation, Höhe, usw." />
</TYPE>
<TYPE Id="RDK:900066" Name="KreiselMerkmaleType" 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 Id="RDK:900066" Name="KreiselMerkmaleType" 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:900067" Name="Abstand (Kreiselachse A - Kreiselachse) in Meter" Type="string" />
<FIELD Id="RDK:900069" Name="Anzahl der Separatoren" Type="string" />
@@ -9522,6 +9522,110 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
</IFTHENELSE>
</FOREACHLOOP>
</FUNCTION>
<GROUP Id="RDK:20817725" Name="StreckeGroupFunctions" SubType="FunctionSet" IncludeDate="0">
<FUNCTION Id="RDK:20817716" Name="CreateGroup" DesignTimeRemark="Erzeugt eine Gruppe aus den gegebenen zwei Ids" InputTypeName="list" ResultTypeName="boolean">
<GROUP Id="RDK:20824312" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20824311" Name="id0" Type="string">
<SET Id="RDK:20824328" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:20831166" Name="id1" Type="string">
<SET Id="RDK:20831165" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[1]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:20817718" Name="DestroyGroup" DesignTimeRemark="Löscht die Gruppe mit der gegeben Id" InputTypeName="string" ResultTypeName="boolean">
<GROUP Id="RDK:20832590" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20832587" Name="id0" Type="string">
<SET Id="RDK:20832586" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:20817720" Name="IsInGroup" DesignTimeRemark="Prüft ob die gegeben Id in einer Gruppe ist" InputTypeName="string" ResultTypeName="boolean">
<GROUP Id="RDK:20832570" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20832569" Name="id0" Type="string">
<SET Id="RDK:20832568" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:20817722" Name="GetFollowingIds" DesignTimeRemark="Gibt Alle Ids in der Gruppe zurüc, die dem gegebenen Element folgen" InputTypeName="string" ResultTypeName="string[]">
<GROUP Id="RDK:20832564" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20832563" Name="id0" Type="string">
<SET Id="RDK:20832562" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:20817724" Name="GetPreviousIds" DesignTimeRemark="Gibt Alle Ids in der Gruppe zurück, die dem gegebenen Element in der Strecke voraus liegen" InputTypeName="string" ResultTypeName="string[]">
<GROUP Id="RDK:20832558" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20832557" Name="id0" Type="string">
<SET Id="RDK:20832556" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:20817727" Name="RemoveFromGroup" DesignTimeRemark="Löscht die gegebene Id aus der Gruppe " InputTypeName="string" ResultTypeName="boolean">
<GROUP Id="RDK:20832552" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20832551" Name="id0" Type="string">
<SET Id="RDK:20832550" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:20817729" Name="AddToGroup" DesignTimeRemark="Fügt die gegebene Id in die Gruppe ein" DesignTimeTip="Params: ElementId_in_Gruppe toAddId" InputTypeName="string[]" ResultTypeName="boolean">
<GROUP Id="RDK:20832546" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20832545" Name="id0" Type="string">
<SET Id="RDK:20832544" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:20817731" Name="MergeGroups" DesignTimeRemark="nimmt die gebenen beiden Ids aus den Enden von Gruppe1 und Gruppe2 macht eine neue Gruppe daraus" InputTypeName="string[]" ResultTypeName="boolean">
<GROUP Id="RDK:20832580" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20832577" Name="id0" Type="string">
<SET Id="RDK:20832576" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:20832579" Name="id1" Type="string">
<SET Id="RDK:20832578" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[1]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:20817733" Name="SplitGroups" DesignTimeRemark="macht aus einer Gruppe zwei. Split erfolgt zwischen den beiden gegebenen Ids" InputTypeName="string[]" ResultTypeName="boolean">
<GROUP Id="RDK:20832540" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:20832537" Name="id0" Type="string">
<SET Id="RDK:20832536" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
</FUNCTION>
</GROUP>
</GROUP>
<FUNCTION Id="RDK:1332780" Name="InheritHeight" DesignTimeNotes="20231005 -1-" InputTypeName="string">
<COMMENTS Id="RDK:20494467" DesignTimeRemark="Bekommt als Parameter ParentId (ID zum Shape, dessen Höhe an alle anderen (direkt und über weitere Kreisel) angebundenen Shapes vererbt werden soll (Param.Input[0])" DesignTimeTip="ParentId bzw. Item0 ist das Objekt, dessen Höhe weitergegeben wird." />
@@ -14486,6 +14590,18 @@ me.x
<VAR Id="RDK:19089175" Name="item_1" Type="Editor2DShapeType" />
<VAR Id="RDK:19474689" Name="LH_fits" Type="boolean" />
<VAR Id="RDK:20494435" Name="InheritHeight_Data" Type="string[]" />
<VAR Id="RDK:20819396" Name="id0" Type="string">
<SET Id="RDK:20819400" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:20819398" Name="id1" Type="string">
<SET Id="RDK:20819402" VarRef="Me">
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
</GROUP>
<SET Id="RDK:1578954" VarRef="Shape_Prototype">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
@@ -14496,7 +14612,7 @@ me.x
<EXP><![CDATA[$C$shapeId_0]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
<EXP><![CDATA[$=$id0]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
@@ -14507,7 +14623,7 @@ me.x
<EXP><![CDATA[$C$shapeId_1]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
<EXP><![CDATA[$=$id1]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
@@ -15369,6 +15485,44 @@ me.x
<EXP />
</CASEGROUP>
</SELECTCASE>
<IFTHENELSE Id="RDK:20819453">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family = "Strecke"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family = "Foerderer"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family = "Gefaellestrecke"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:20819491" SubType="Then">
<IFTHENELSE Id="RDK:20819415">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family = "Strecke"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family = "Foerderer"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family = "Gefaellestrecke"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:20819412" SubType="Then">
<CALLFUNCTION Id="RDK:20819411" DesignTimeNotes="20231005 -1-">
<PAR Name="FuncName">
<EXP><![CDATA[$C$CreateGroup]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$NewList(id0, id1)]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
</FUNCTION>
<FUNCTION Id="RDK:19960886" Name="OnEditor2DUnlinked" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)">
<SELECTCASE Id="RDK:19961188">