iLogic a ETO - MATERIÁL

MATERIÁL - FUNKCE KDYŽ

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=27789
Datum vytištění: 06.kvě.2026 v 20:18

Téma: MATERIÁL - FUNKCE KDYŽ

Odeslal: Lukáš Záruba
Předmět: MATERIÁL - FUNKCE KDYŽ
Datum odeslání: 05.říj.2018 v 19:08

Zdravím,

Rád bych napsal ilogic který dělá tohle ale pořád mi to hlásí chyby:

Když je

iProperties.Material - ocel

Tak napiš do:

iProperties.Value("Custom", "MAT") OC

Chtěl bych mít v pravidle seznam a postupně ho rozšiřovat jak např:

Ocel pozink = PZ

Nerez = NE

Hliník = AL

.....

Chci následně použít uživatelskou vlastnost "MAT" pro jiná pravidla co skládají třeba Název dílu nebo popis či jiné a nechce se mi "MAT" neustále ručně vyplňovat(pravidelně na to zapomínám). Chci aby pravidlo vyplnilo vlastnost za mě automaticky v návaznosti na materiál

-------------
Budu rád za radu i případně všelijaké postřehy.

Odpovědi:

Odeslal: Lukáš Záruba
Datum odeslání: 05.říj.2018 v 21:14

Už to funguje, chyba byla skutečně mezi židlí a klávesnicí, zatím to je jen pár nejpoužívnějších materiálů. Nešlo by to třeba načíst z exlovský tabulky? tam byse mi to psalo jednodušeji.

If iProperties.Material = "Hlin�k 6061" Then
iProperties.Value("Custom", "MAT") = "AL"
Parameter("MAT")=iProperties.Value("Custom", "MAT")

ElseIf iProperties.Material = "NEREZ (�sn 17 240 AISI 304 )" Then
iProperties.Value("Custom", "MAT") = "NE"
Parameter("MAT")=iProperties.Value("Custom", "MAT")

ElseIf iProperties.Material = "Ocel (�sn 11 373 DIN 37-2)" Then
iProperties.Value("Custom", "MAT") = "OC"
Parameter("MAT")=iProperties.Value("Custom", "MAT")

ElseIf iProperties.Material = "Ocel pozink (�sn 11 373 DIN 37-2)" Then
iProperties.Value("Custom", "MAT") = "PZ"
Parameter("MAT")=iProperties.Value("Custom", "MAT")

ElseIf iProperties.Material = "PA 6 (�erny)" Then
iProperties.Value("Custom", "MAT") = "PA 6 (�)"
Parameter("MAT")=iProperties.Value("Custom", "MAT")


End If

-------------
Budu rád za radu i případně všelijaké postřehy.