Vytisknout stránku | Zavřít okno

Aktualizace pravidla - modelu

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: iLogic a ETO
Popis fóra: Funkce a makra iLogic, Inventor Engineering to Order (ETO), automatizace a konfigurace výrobků
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=25573
Datum vytištění: 06.čer.2025 v 00:54


Téma: Aktualizace pravidla - modelu
Odeslal: Mintenkeris
Předmět: Aktualizace pravidla - modelu
Datum odeslání: 23.led.2018 v 13:35
Dobrý den, chci se zeptat kde mám chybu? Parametry měním skrze formulář ale model se neaktualizuje, pravidlo spuštěné. Pokud jsem měl všechny parametry napsané bez funkce parameter "tzv na prasáka" tak mi vše fungovalo a přepočetlo se to po změně hodnot v formuláři a výsledný model se přehodil. 


iLogicVb.UpdateWhenDone = True
Parameter.UpdateAfterChange = True



'V�echny vzd�lenosti pot�bn� k ode�ten� od  HA k vypo�ten� d�lky 05-01
Parameter("Laenge_H01") = (Parameter("Vrchd�lka") - Parameter("Kraj_osa")) + (Parameter("Delka") - Parameter("D1odbok"))


Parameter("Lange_0501") = Parameter("HA") - Parameter("Laenge_H01")



'Pattern a d�lka jednotliv�ch parts

If Parameter("Lange_0501") > 0 Then 
Parameter("A_Segm_H") = Ceil (Parameter("Lange_0501")/Parameter("Laenge_Max01"))

End If

If Parameter("A_Segm_H") = 1 Then  
Parameter("L_Lange_Parts") = Parameter("Lange_0501")
Else Parameter("L_Lange_Parts") = Parameter("Lange_0501") / Parameter("A_Segm_H")

End If 


'Podm�nky pro min velikost HA

If Parameter("L_Lange_Parts") < 0 Then 
MessageBox.Show("Lange of part 05 =  " & Parameter("Lange_0501"), "Error",MessageBoxButtons.OK,MessageBoxIcon.Error)

End If


Odpovědi:
Odeslal: Petr Klimeš
Datum odeslání: 26.led.2018 v 16:25
Dobrý den,

jedná se o pravidlo uvnitř modelu či globální ? Bylo by možné daný soubor nahrát případně zaslat ?


Vytisknout stránku | Zavřít okno