CAD Fórum : Aktualizace pravidla - modelu https://www.cadforum.cz/forum/ Thu, 07 May 2026 01:10:22 +0000 Fri, 26 Jan 2018 16:25:16 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=25573 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[Aktualizace pravidla - modelu : Dobrý den,jedná se o pravidlouvnitř...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=25573&PID=110280&title=aktualizace-pravidla-modelu#110280 Autor: Petr Klimeš
Předmět: 25573
Zasláno: 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 ?

]]> Fri, 26 Jan 2018 16:25:16 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=25573&PID=110280&title=aktualizace-pravidla-modelu#110280 <![CDATA[Aktualizace pravidla - modelu : Dobrý den, chci se zeptat kde...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=25573&PID=110237&title=aktualizace-pravidla-modelu#110237 Autor: Mintenkeris
Předmět: 25573
Zasláno: 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 = TrueParameter.UpdateAfterChange = True'V�echny vzd�lenosti pot�bn� k ode�ten� od  HA k vypo�ten� d�lky 05-01Parameter("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 partsIf Parameter("Lange_0501") > 0 Then Parameter("A_Segm_H") = Ceil (Parameter("Lange_0501")/Parameter("Laenge_Max01"))End IfIf 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 HAIf Parameter("L_Lange_Parts") < 0 Then MessageBox.Show("Lange of part 05 =  " & Parameter("Lange_0501"), "Error",MessageBoxButtons.OK,MessageBoxIcon.Error)End If
]]> Tue, 23 Jan 2018 13:35:32 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=25573&PID=110237&title=aktualizace-pravidla-modelu#110237