Diskuzní fórum, poradna
CAD diskuze, rady, výměna zkušeností |
Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion 360, 3ds Max a s dalšími CAD aplikacemi.
Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.
Fórum nenahrazuje technický support firmy Arkance Systems (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.cadstudio.cz
Sloučení dvou pravidel |
Odpovědět | archiv |
Autor | |
madep
Zasloužilý člen Přihlášen: 01.pro.2006 Lokalita: ČR (Pha) Používám: Inventor 2022 Stav: Offline Bodů: 186 |
Téma: Sloučení dvou pravidel Zasláno: 15.srp.2020 v 19:37 |
Mám dvě pravidla. Jedno zapisuje do uživatelské iVlastnosti informaci o materiál, třeba PMMA tl.10mm a druhé pravidlo zapisuje skladové číslo uvedené v řádku "Komentář" do řádku "Skladové číslo". Ptřeboval bych, aby se obě pravidla spouštěla současně, takž jako nejlepší řešení vidím obě pravidla sloučit.
Ale nevím jak. První pravidlo: Dim oDoc As PartDocument = ThisDoc.Document iProperties.Value("Custom", "Materiál") = oDoc.ActiveMaterial.DisplayName Druhé pravidlo: If ThisApplication.ActiveDocumentType <> kPartDocumentObject Then Exit Sub Dim oDoc As PartDocument oPartDoc = ThisApplication.ActiveDocument Dim oMat As Asset oMat = oPartDoc.ActiveMaterial iProperties.Value("Project", "Stock number") = oMat.Item("physmat_Comments").Value |
|
Navara
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Arkance Systems support Arkance Systems Přihlášen: 08.zář.2008 Lokalita: ČR (Pha) Používám: Inventor Stav: Offline Bodů: 1636 |
Zasláno: 15.srp.2020 v 22:04 |
V principu je stačí napsat za sebe. Ale musíte si dát pozor, abyste nedefinoval proměnnou se stejným názvem dvakrát.
|
|
madep
Zasloužilý člen Přihlášen: 01.pro.2006 Lokalita: ČR (Pha) Používám: Inventor 2022 Stav: Offline Bodů: 186 |
Zasláno: 16.srp.2020 v 15:45 |
Takhle mě to napadlo, ale nechtělo mi to fungovat.
Tak jsem to udělal takhle: If ThisApplication.ActiveDocumentType <> DocumentTypeEnum.kPartDocumentObject Then Exit Sub Dim oDoc As PartDocument = ThisDoc.Document Dim oMat As Asset = oDoc.ActiveMaterial iProperties.Value("Custom", "Materiál") = oDoc.ActiveMaterial.DisplayName iProperties.Value("Project", "Stock number") = oMat.Item("physmat_Comments").Value |
|
Navara
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Arkance Systems support Arkance Systems Přihlášen: 08.zář.2008 Lokalita: ČR (Pha) Používám: Inventor Stav: Offline Bodů: 1636 |
Zasláno: 16.srp.2020 v 16:27 |
Tohle je samozřejmě mnohem čistší
|
|
Pro technickou podporu CAD
kontaktujte Helpdesk
Odpovědět | |
Přejít na fórum | Oprávnění fóra Nemůžete vytvářet nová témata v tomto fóru Nemůžete odpovídat na témata v tomto fóru Nemůžete vymazávat vaše příspěvky v tomto fóru Nemůžete upravovat vaše příspěvky v tomto fóru Nemůžete vytvářet ankety v tomto fóru Nemůžete hlasovat v anketách v tomto fóru |
Stránka byla vygenerována za 0,533 sekund.