InheritHeight Funktion gefixt; Berechnung erfolgt ohne ShapePrototype; Einziger Übergabeparameter ist die ShapeId des Parent Elements, dessen Höhe an alle Children vererbt wird
This commit is contained in:
Simon Schmutzler
+114
-89
@@ -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="s.schmutzler [ANGEBOT-NB06]" ModDate="2024-07-03T09:31:38" LanguageVersion="2014.1.3.676" />
|
||||
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="s.schmutzler [ANGEBOT-NB06]" ModDate="2024-07-10T12:09:11" LanguageVersion="2014.1.3.680" />
|
||||
<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">
|
||||
@@ -465,7 +465,7 @@
|
||||
<FIELD Id="RDK:1014048" Name="handler" Type="string" />
|
||||
<FIELD Id="RDK:1014049" Name="params" Type="Editor2DParameterTypeList" />
|
||||
</TYPE>
|
||||
<TYPE Id="RDK:1014057" Name="Editor2DEventArgumentsType" SubType="structure">
|
||||
<TYPE Id="RDK:1014057" Name="Editor2DEventArgumentsType" Expanded="True" SubType="structure">
|
||||
<TYPE_VALUES />
|
||||
<FIELD Id="RDK:1014051" Name="class" Type="string" />
|
||||
<FIELD Id="RDK:1014052" Name="handler" Type="Editor2DEventHandlerType" />
|
||||
@@ -827,12 +827,12 @@
|
||||
<FIELD Id="RDK:18946347" Name="toSetParameters" Type="SEExportParamType[]" />
|
||||
</TYPE>
|
||||
</GROUP>
|
||||
<TYPE Id="RDK:1007393" Name="Point2D" SubType="structure" HasArrayType="True">
|
||||
<TYPE Id="RDK:1007393" Name="Point2D" Expanded="True" SubType="structure" HasArrayType="True">
|
||||
<TYPE_VALUES />
|
||||
<FIELD Id="RDK:1007391" Name="X" Type="double" />
|
||||
<FIELD Id="RDK:1007392" Name="Y" Type="double" />
|
||||
</TYPE>
|
||||
<TYPE Id="RDK:1007741" Name="SSY_Shapes" SubType="structure" HasArrayType="True">
|
||||
<TYPE Id="RDK:1007741" Name="SSY_Shapes" Expanded="True" SubType="structure" HasArrayType="True">
|
||||
<TYPE_VALUES />
|
||||
<FIELD Id="RDK:1007735" Name="name" Type="string" />
|
||||
<FIELD Id="RDK:1007736" Name="ShapeID" Type="string" />
|
||||
@@ -5715,9 +5715,20 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
</IFTHENELSE>
|
||||
</FOREACHLOOP>
|
||||
</FUNCTION>
|
||||
<FUNCTION Id="RDK:1280515" Name="CollectKreiselGroup" DesignTimeNotes="20230928 -1-" InputTypeName="string[]" ResultTypeName="string[]">
|
||||
<FUNCTION Id="RDK:1280515" Name="CollectKreiselGroup" DesignTimeNotes="20230928 -1-" InputTypeName="string" ResultTypeName="string[]">
|
||||
<GROUP Id="RDK:1280524" Name="Local Variables" SubType="VarSet" IncludeDate="0">
|
||||
<VAR Id="RDK:1280523" Name="ID" Type="string" />
|
||||
<VAR Id="RDK:1280523" Name="Parent_Id" Type="string">
|
||||
<SET Id="RDK:20511423" VarRef="Me">
|
||||
<EXP><![CDATA[$=$Param.Input]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</VAR>
|
||||
<VAR Id="RDK:20511425" Name="Parent_Shape" Type="Editor2DShapeType">
|
||||
<SET Id="RDK:20511426" VarRef="Me">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Parent_Id]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</VAR>
|
||||
<VAR Id="RDK:1286433" Name="KreiselList" Type="string[]" />
|
||||
<VAR Id="RDK:1280577" Name="Kreisel" Type="string" />
|
||||
<VAR Id="RDK:1280556" Name="TempLink" Type="string" />
|
||||
@@ -5730,8 +5741,8 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<EXP><![CDATA[$C$NOTHING]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SET Id="RDK:1461340" VarRef="KreiselList">
|
||||
<EXP><![CDATA[$=$Param.Input]]></EXP>
|
||||
<SET Id="RDK:1461340" VarRef="KreiselList" DesignTimeTip="ExecOnValues(Shape_List["id="+Param.Input].links, "StrAfter(Me, "";"")", "")">
|
||||
<EXP><![CDATA[$=$ExecOnValues(Parent_Shape.links, "StrAfter(Me, "";"")", "")]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<WHILELOOP Id="RDK:1280559">
|
||||
@@ -5747,7 +5758,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
</PAR>
|
||||
<GROUP Id="RDK:1442601" Name="Remove for Gefaellestrecke" SubType="Generic" DesignTimeNotes="20231005 -1-">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.family = "Gefaellestrecke"]]></EXP>
|
||||
<EXP><![CDATA[$=$Parent_Shape.family = "Gefaellestrecke"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Contains(AddedKreiselList, Kreisel)]]></EXP>
|
||||
@@ -5757,10 +5768,10 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:1442613" Name="Group" SubType="Generic" DesignTimeNotes="If NOT HoeheOben changed & Linked to cp1 (top point)
If NOT HoeheUnten changed & Linked to cp2 (bottom point)">
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Contains(Shape_Prototype.links, "cp1;" + Kreisel) AND ShapeList["id=" + Shape_Prototype.id].GefaelleDefinition.HoeheOben <> Shape_Prototype.GefaelleDefinition.HoeheOben]]></EXP>
|
||||
<EXP><![CDATA[$=$Contains(Parent_Shape.links, "cp1;" + Kreisel)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Contains(Shape_Prototype.links, "cp2;" + Kreisel) AND ShapeList["id=" + Shape_Prototype.id].GefaelleDefinition.HoeheUnten <> Shape_Prototype.GefaelleDefinition.HoeheUnten]]></EXP>
|
||||
<EXP><![CDATA[$=$Contains(Parent_Shape.links, "cp2;" + Kreisel)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<REMOVE_ADD Id="RDK:1442648" ListRef="KreiselList" Value="$=$Kreisel">
|
||||
<EXP />
|
||||
@@ -5774,13 +5785,16 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<EXIT_PROCESS Id="RDK:1442654" BreakType="2" ExitStatus="0" />
|
||||
</GROUP>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1293979" Name="If NOT Kreisel" SubType="Generic">
|
||||
<GROUP Id="RDK:1293979" Name="If NOT Kreisel / Eckrad" SubType="Generic">
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + Kreisel].family = "Kreisel"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Contains(RemovedKreiselList, Kreisel)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + Kreisel].family = "Eckrad"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<REMOVE_ADD Id="RDK:1293997" ListRef="KreiselList" Value="$=$Kreisel">
|
||||
<EXP />
|
||||
</REMOVE_ADD>
|
||||
@@ -5795,7 +5809,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + Kreisel].family = "Gefaellestrecke"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Kreisel = Shape_Prototype.id]]></EXP>
|
||||
<EXP><![CDATA[$=$Kreisel = Parent_Id]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Contains(RemovedGefaellestreckeList, Kreisel)]]></EXP>
|
||||
@@ -5817,7 +5831,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<EXP><![CDATA[$=$Contains(RemovedKreiselList, Kreisel)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Kreisel = Shape_Prototype.id]]></EXP>
|
||||
<EXP><![CDATA[$=$Kreisel = Parent_Id]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<LIST_ADD Id="RDK:1280583" ListRef="Param.Result">
|
||||
<PAR Name="VALUE_TO_ADD">
|
||||
@@ -5841,15 +5855,15 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<PAR Name="ExitCondExp">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<GROUP Id="RDK:1280595" Name="Only for Kreisel" SubType="Generic">
|
||||
<GROUP Id="RDK:1280595" Name="Only for Kreisel / Eckrad" SubType="Generic">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + TempLink].family = "Kreisel"]]></EXP>
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + TempLink].family = "Kreisel" or ShapeList["id=" + TempLink].family = "Eckrad"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Contains(Param.Result, TempLink)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$TempLink = Shape_Prototype.id]]></EXP>
|
||||
<EXP><![CDATA[$=$TempLink = Parent_Id]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<LIST_ADD Id="RDK:1280571" ListRef="Param.Result">
|
||||
<PAR Name="VALUE_TO_ADD">
|
||||
@@ -5883,7 +5897,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + TempLink].family = "Gefaellestrecke"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$TempLink = Shape_Prototype.id]]></EXP>
|
||||
<EXP><![CDATA[$=$TempLink = Parent_Id]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Contains(RemovedGefaellestreckeList, TempLink)]]></EXP>
|
||||
@@ -9477,28 +9491,51 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
</FOREACHLOOP>
|
||||
</FUNCTION>
|
||||
</GROUP>
|
||||
<FUNCTION Id="RDK:1332780" Name="InheritHeight" DesignTimeNotes="20231005 -1-" InputTypeName="InheritHeightType">
|
||||
<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." />
|
||||
<GROUP Id="RDK:1219232" Name="Inherit height" SubType="Generic" DesignTimeNotes="20230928 -1-">
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$Count(ShapeList[Param.Input.ParentIndex].links) = 0]]></EXP>
|
||||
<EXP><![CDATA[$=$Count(ShapeList["id="+Param.Input].links) = 0]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:1143994" Name="Local Vars" SubType="VarSet" IncludeDate="0" DesignTimeNotes="20230928 -1-">
|
||||
<VAR Id="RDK:1528242" Name="parent_links" Type="string[]">
|
||||
<SET Id="RDK:19945395" VarRef="Me">
|
||||
<EXP><![CDATA[$=$ShapeList[Param.Input.ParentIndex].links]]></EXP>
|
||||
<SET Id="RDK:19945395" VarRef="Me" DesignTimeRemark="Hole alle verbundenen Items (links) des ParentItems (ParentId = Param.Input)">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input].links ]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</VAR>
|
||||
<VAR Id="RDK:19942027" Name="TempKreisel" Type="string" />
|
||||
<VAR Id="RDK:20494466" Name="parentHeight" Type="double" />
|
||||
<VAR Id="RDK:20497858" Name="TempKreisel" Type="string" />
|
||||
<VAR Id="RDK:19795588" Name="TempKreiselLink" Type="string" />
|
||||
<VAR Id="RDK:19866065" Name="KreiselGroupList" Type="string[]" DesignTimeNotes="20230928 -1-" />
|
||||
</GROUP>
|
||||
<CALLFUNCTION Id="RDK:1280616">
|
||||
<COMMENTS Id="RDK:20497856" DesignTimeRemark="ParentHeight als Höhe des Parent Objekts (muss Kreisel oder Eckrad sein)" DesignTimeTip="ParentId bzw. Item0 ist das Objekt, dessen Höhe weitergegeben wird." />
|
||||
<SELECTCASE Id="RDK:20607516">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input].family]]></EXP>
|
||||
<CASEGROUP Id="RDK:20607517" CaseType="0">
|
||||
<EXP><![CDATA[$C$Kreisel]]></EXP>
|
||||
<SET Id="RDK:20497886" VarRef="parentHeight">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input].KreiselDefinition.Hoehe]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20607520" CaseType="0">
|
||||
<EXP><![CDATA[$C$Eckrad]]></EXP>
|
||||
<SET Id="RDK:20607522" VarRef="parentHeight">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input].EckradDefinition.Hoehe]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20607518" CaseType="1">
|
||||
<EXP />
|
||||
</CASEGROUP>
|
||||
</SELECTCASE>
|
||||
<CALLFUNCTION Id="RDK:1280616" DesignTimeTip="old input value: ExecOnValues(parent_links, "StrAfter(Me, "";"")", "")">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CollectKreiselGroup]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$ExecOnValues(parent_links, "StrAfter(Me, "";"")", "")]]></EXP>
|
||||
<EXP><![CDATA[$=$Param.Input]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$KreiselGroupList]]></EXP>
|
||||
@@ -9517,6 +9554,10 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<VAR Id="RDK:19787415" Name="UebergabeListe" Type="SSGParameter[]" />
|
||||
<VAR Id="RDK:19790136" Name="shape_item" Type="Editor2DShapeType" />
|
||||
</GROUP>
|
||||
<SET Id="RDK:20623826" VarRef="UebergabeListe">
|
||||
<EXP><![CDATA[$C$NOTHING]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SET_STRUCT Id="RDK:19795624" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
|
||||
<PAR Name="Key">
|
||||
<EXP><![CDATA[$C$ShapeId]]></EXP>
|
||||
@@ -9534,7 +9575,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
</PAR>
|
||||
<PAR Name="Str" />
|
||||
<PAR Name="Dbl">
|
||||
<EXP><![CDATA[$=$Param.Input.NewHoehe]]></EXP>
|
||||
<EXP><![CDATA[$=$parentHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Int" />
|
||||
<PAR Name="Boo" />
|
||||
@@ -9588,6 +9629,10 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + StrAfter(TempKreiselLink, ";")]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SET Id="RDK:20563558" VarRef="UebergabeListe">
|
||||
<EXP><![CDATA[$C$NOTHING]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<IFTHENELSE Id="RDK:19795600">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$shape_item.family = "Gefaellestrecke"]]></EXP>
|
||||
@@ -9675,11 +9720,15 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + StrAfter(Link, ";")]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SET Id="RDK:20573688" VarRef="UebergabeListe">
|
||||
<EXP><![CDATA[$C$NOTHING]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<IFTHENELSE Id="RDK:19841630">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$shape_item.family = "Gefaellestrecke"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="true">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$shape_item.family = "Foerderer"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:19841629" SubType="Then">
|
||||
@@ -9688,7 +9737,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<EXP><![CDATA[$C$shapeId_0]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Str">
|
||||
<EXP><![CDATA[$=$ShapeList[Param.Input.ParentIndex].id]]></EXP>
|
||||
<EXP><![CDATA[$=$Param.Input]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Dbl" />
|
||||
<PAR Name="Int" />
|
||||
@@ -9973,23 +10022,12 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$IndexOf(ShapeList, Shape_Prototype) = -1]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<SET_STRUCT Id="RDK:1345491" VarRef="InheritHeightData" ClearAll="True" DesignTimeNotes="Results in -1:
IndexOfByFieldValue(ShapeList, "id", Shape_Prototype.id)
But element is in list">
|
||||
<PAR Name="ParentIndex">
|
||||
<EXP><![CDATA[$=$IndexOf(ShapeList, Shape_Prototype)]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="NewHoehe">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.KreiselDefinition.Hoehe]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="NewHoeheOben" />
|
||||
<PAR Name="NewHoeheUnten" />
|
||||
<PAR Name="Text" />
|
||||
</SET_STRUCT>
|
||||
<CALLFUNCTION Id="RDK:1332781" DesignTimeNotes="20231005 -1-">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$InheritHeightData]]></EXP>
|
||||
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
@@ -14673,6 +14711,23 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
</GROUP>
|
||||
</IFTHENELSE>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:20612257" Name="Eckrad exists" SubType="Generic" DesignTimeNotes="Inherit height to direct Shaps and set others to Gelb (except Kreisel Groups).

ShapeList["id=" + Shape_Prototype.id].KreiselDefinition.Hoehe is not working here (returns empty or wrong value).
Because of this use TempIndex instead.">
|
||||
<VALUECONDITION Value="false">
|
||||
<EXP><![CDATA[$=$IndexOf(ShapeList, Shape_Prototype) = -1]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<CALLFUNCTION Id="RDK:20612256" DesignTimeNotes="20231005 -1-">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
<EXIT_PROCESS Id="RDK:1546000" BreakType="3" ExitStatus="0" />
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:1546094" CaseType="0">
|
||||
@@ -14831,7 +14886,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1332808" Name="Gefaellestrecke HoeheOben OR HoeheUnten was changed" SubType="Generic" DesignTimeNotes="20231005 -1-

Inherit height to direct Shaps and set others to Gelb (except Kreisel Groups).">
|
||||
<GROUP Id="RDK:1332808" Name="Gefaellestrecke HoeheOben OR HoeheUnten was changed" SubType="Generic" Suppressed="True" DesignTimeNotes="20231005 -1-

Inherit height to direct Shaps and set others to Gelb (except Kreisel Groups).">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + Shape_Prototype.id].GefaelleDefinition.HoeheOben <> Shape_Prototype.GefaelleDefinition.HoeheOben]]></EXP>
|
||||
</VALUECONDITION>
|
||||
@@ -14975,7 +15030,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:18732404" Name="Strecke HoeheOben OR HoeheUnten was changed" SubType="Generic" DesignTimeNotes="20231005 -1-

Inherit height to direct Shaps and set others to Gelb (except Kreisel Groups).">
|
||||
<GROUP Id="RDK:18732404" Name="Strecke HoeheOben OR HoeheUnten was changed" SubType="Generic" Suppressed="True" DesignTimeNotes="20231005 -1-

Inherit height to direct Shaps and set others to Gelb (except Kreisel Groups).">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + Shape_Prototype.id].StreckeDefinition.HoeheOben <> Shape_Prototype.StreckeDefinition.HoeheOben]]></EXP>
|
||||
</VALUECONDITION>
|
||||
@@ -15193,7 +15248,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
</GROUP>
|
||||
</IFTHENELSE>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:18116642" Name="Gefaellestrecke HoeheOben OR HoeheUnten was changed" SubType="Generic" DesignTimeNotes="20231005 -1-

Inherit height to direct Shaps and set others to Gelb (except Kreisel Groups).">
|
||||
<GROUP Id="RDK:18116642" Name="Gefaellestrecke HoeheOben OR HoeheUnten was changed" SubType="Generic" Suppressed="True" DesignTimeNotes="20231005 -1-

Inherit height to direct Shaps and set others to Gelb (except Kreisel Groups).">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$ShapeList["id=" + Shape_Prototype.id].FoerdererDefinition.H_1 <> Shape_Prototype.FoerdererDefinition.H_1]]></EXP>
|
||||
</VALUECONDITION>
|
||||
@@ -17657,6 +17712,7 @@ me.x
|
||||
<VAR Id="RDK:18399128" Name="shape_id" Type="string" />
|
||||
<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[]" />
|
||||
</GROUP>
|
||||
<SET Id="RDK:1578954" VarRef="Shape_Prototype">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
|
||||
@@ -17688,24 +17744,12 @@ me.x
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family]]></EXP>
|
||||
<CASEGROUP Id="RDK:1576707" CaseType="0">
|
||||
<EXP><![CDATA[$C$Kreisel]]></EXP>
|
||||
<COMMENTS Id="RDK:19602905" Suppressed="True" DesignTimeRemark="InheritHeight wird hier nicht benötigt; Höhe wird durch Funktion SetHeightOnConnect gesetzt" />
|
||||
<SET_STRUCT Id="RDK:19937317" VarRef="InheritHeightData" ClearAll="True" DesignTimeNotes="Results in -1:
IndexOfByFieldValue(ShapeList, "id", Shape_Prototype.id)
But element is in list">
|
||||
<PAR Name="ParentIndex">
|
||||
<EXP><![CDATA[$=$IndexOf(ShapeList, ShapeList["id="+Param.Input[1].shapeID])]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="NewHoehe">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].KreiselDefinition.Hoehe]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="NewHoeheOben" />
|
||||
<PAR Name="NewHoeheUnten" />
|
||||
<PAR Name="Text" />
|
||||
</SET_STRUCT>
|
||||
<CALLFUNCTION Id="RDK:19927916" DesignTimeNotes="20231005 -1-">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$InheritHeightData]]></EXP>
|
||||
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
@@ -17717,6 +17761,11 @@ me.x
|
||||
<EXP><![CDATA[$=$(ShapeList["id="+Param.Input[0].shapeID].Rotationsklasse="Rotationsobjekt") Or
|
||||
(ShapeList["id="+Param.Input[1].shapeID].Rotationsklasse="Rotationsobjekt")]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<COMMENTS Id="RDK:20502617" DesignTimeRemark="Aktualisiere Shape_Prototype (Element, das an das Parent Element verbunden wurde) für nachfolgende Inherit Rotation" />
|
||||
<SET Id="RDK:20539885" VarRef="Shape_Prototype">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<GROUP Id="RDK:132804" Name="Ihnerit rotation" SubType="Generic">
|
||||
<SET Id="RDK:514767" VarRef="OriginalRatation">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.KreiselDefinition.Drehung]]></EXP>
|
||||
@@ -17861,7 +17910,7 @@ me.x
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1002232" Name="InheritHeight" SubType="Generic">
|
||||
<GROUP Id="RDK:1002232" Name="InheritHeight" SubType="Generic" Suppressed="True">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Count(ListDiff(NewListStr("Gefaellestrecke", "Kreisel"),NewListStr(ShapeList["id="+Param.Input[0].shapeID].family, ShapeList["id="+Param.Input[1].shapeID].family)))=0]]></EXP>
|
||||
</VALUECONDITION>
|
||||
@@ -18089,12 +18138,12 @@ me.x
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:1701482">
|
||||
<CALLFUNCTION Id="RDK:20494432">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
|
||||
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
@@ -20551,7 +20600,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:19595375" CaseType="0">
|
||||
<EXP><![CDATA[$C$Eckrad]]></EXP>
|
||||
<SET Id="RDK:19943522" VarRef="ShapeList["id="+shapeId].KreiselDefinition.Hoehe">
|
||||
<SET Id="RDK:19943522" VarRef="ShapeList["id="+shapeId].EckradDefinition.Hoehe">
|
||||
<EXP><![CDATA[$=$hoehe]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
@@ -20575,36 +20624,12 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
<VAR Id="RDK:19664798" Name="cps_verbunden" Type="string[]" />
|
||||
<VAR Id="RDK:19682385" Name="cp_0" Type="structure" />
|
||||
</GROUP>
|
||||
<CALLFUNCTION Id="RDK:19866001">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$IndexOfByFieldValue_SSG]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Param.Input["key=shapeId_0"].Str]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$shapeList_idx_0]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:19866007">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$IndexOfByFieldValue_SSG]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Param.Input["key=shapeId_1"].Str]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$shapeList_idx_1]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<SET Id="RDK:19710796" VarRef="item_0">
|
||||
<EXP><![CDATA[$=$ShapeList[shapeList_idx_0]]]></EXP>
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input["key=shapeId_0"].Str]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SET Id="RDK:19710798" VarRef="item_1">
|
||||
<EXP><![CDATA[$=$ShapeList[shapeList_idx_1]]]></EXP>
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input["key=shapeId_1"].Str]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<CALLFUNCTION Id="RDK:19710799">
|
||||
@@ -25177,7 +25202,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
<PAR Name="Required" />
|
||||
<PAR Name="Hidden" />
|
||||
<PAR Name="ROnly">
|
||||
<EXP><![CDATA[$=$True]]></EXP>
|
||||
<EXP><![CDATA[$=$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Disabled" />
|
||||
<PAR Name="Pressed" />
|
||||
@@ -25230,7 +25255,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
<PAR Name="Required" />
|
||||
<PAR Name="Hidden" />
|
||||
<PAR Name="ROnly">
|
||||
<EXP><![CDATA[$=$True]]></EXP>
|
||||
<EXP><![CDATA[$=$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Disabled" />
|
||||
<PAR Name="Pressed" />
|
||||
|
||||
Reference in New Issue
Block a user