SetheightonConnect soll flexibel mit SSGParameter Übergabe aufrufbar sein, statt vorherigem Aufruf über Param.Input der OnConnect Callbackfunktion - noch nicht vollstängig implementiert, nicht lauffähig

This commit is contained in:
Simon Schmutzler
2024-06-12 16:48:36 +02:00
parent bd4028cd04
commit 8fdeba8da6
+31 -8
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="s.schmutzler [ANGEBOT-NB06]" ModDate="2024-06-12T16:22:33" LanguageVersion="2014.1.3.674" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="s.schmutzler [ANGEBOT-NB06]" ModDate="2024-06-12T16:46:27" LanguageVersion="2014.1.3.674" />
<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">
@@ -13340,6 +13340,7 @@ me.x
<VAR Id="RDK:506783" Name="PrototypeLink" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:514766" Name="OriginalRatation" Type="integer" />
<VAR Id="RDK:18374148" Name="RueckgabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:19653272" Name="UebergabeListe" Type="SSGParameter[]" />
<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" />
@@ -13348,6 +13349,28 @@ me.x
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET_STRUCT Id="RDK:19653274" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$shapeId_0]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:19653278" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$shapeId_1]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SELECTCASE Id="RDK:1576706">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family]]></EXP>
<CASEGROUP Id="RDK:1576707" CaseType="0">
@@ -13581,7 +13604,7 @@ me.x
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$RueckgabeListe]]></EXP>
@@ -13735,7 +13758,7 @@ me.x
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
@@ -13767,7 +13790,7 @@ me.x
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
@@ -13876,7 +13899,7 @@ me.x
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
@@ -16032,7 +16055,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
</GROUP>
</IFTHENELSE>
</FUNCTION>
<FUNCTION Id="RDK:1698052" Name="SetHeightOnConnect" InputTypeName="Editor2DEventArgumentsTypeList" ResultTypeName="SSGParameter[]">
<FUNCTION Id="RDK:1698052" Name="SetHeightOnConnect" InputTypeName="SSGParameter[]" ResultTypeName="SSGParameter[]">
<GROUP Id="RDK:1772339" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:1772341" Name="item_0" Type="Editor2DShapeType" />
<VAR Id="RDK:1772343" Name="item_1" Type="Editor2DShapeType" />
@@ -16049,11 +16072,11 @@ ShapeList["id="+Param.Input[1].shapeID].name
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:1707740" VarRef="item_0">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
<EXP><![CDATA[$=$ShapeList["id="+Param.Input["key=shapeId_0"].Str]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:1707750" VarRef="item_1">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID]]]></EXP>
<EXP><![CDATA[$=$ShapeList["id="+Param.Input["key=shapeId_1"].Str]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<GROUP Id="RDK:1698060" Name="Filter" SubType="Generic" DesignTimeNotes="(ShapeList[&quot;id=&quot;+Param.Input[0].shapeID].family=&quot;Gefaellestrecke&quot; And (ShapeList[&quot;id=&quot;+Param.Input[1].shapeID].Rotationsklasse=&quot;Rotationsobjekt&quot;and IsTagInString(Param.Input[1].connectionPointID, &quot;defcp&quot;))) &#xA;Or &#xA;(ShapeList[&quot;id=&quot;+Param.Input[1].shapeID].family=&quot;Gefaellestrecke&quot; And (ShapeList[&quot;id=&quot;+Param.Input[0].shapeID].Rotationsklasse=&quot;Rotationsobjekt&quot; and IsTagInString(Param.Input[0].connectionPointID, &quot;defcp&quot;))) &#xA;">