Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk - od firmy CAD Studio [www.cadforum.cz]
ČeskySlovenskyEnglishDeutsch
Přihlášení:
▶ Registrace

 právě nás čte: 3431 

CAD tip CAD tip # 9341:

Otázka CAD 
 %  platforma  kategorie 
Q - otázka

Použití iLogic na rozklad jména IPT souboru a naplnění iVlastností.

A - odpověď Předpokládejme, že máte vaše IPT soubory pojmenované podle vzoru NázevSOUČÁSTI-čREVIZE.IPT (např. tracker9864-rev6-7-2013.ipt) a chcete automaticky přiřadit iVlastnosti dané součásti "Popis" a "Číslo revize" podle jména a revize zjištěného z názvu souboru.

Na tento postup můžete využít následující iLogic makro. Toto makro využívá regulární výrazy a jejich závorkové skupiny (grupy) pro rozložení názvu souboru a zjištění první a druhé části řetězce oddělené pomocí "-" (v prvním příkladu), nebo rozložení názvu souboru podle pevné délky, počtu znaků - 7 a 3 (v druhém, zakomentovaném příkladu):

docname=ThisDoc.FileName(False) 'e.g. "tracker9864-rev6-7-2013"

Dim matches As System.Text.RegularExpressions.MatchCollection
Dim match As System.Text.RegularExpressions.Match
Dim groups As System.Text.RegularExpressions.GroupCollection
matches = System.Text.RegularExpressions.Regex.Matches(docname, "\b([^-]+)-*([^-]+).*\b") '*****-****: $1/$2 = tracker9864/rev6
'matches = System.Text.RegularExpressions.Regex.Matches(docname, "\b(.{7})(.{3}).*\b") 'NNNNNNRRR*: $1/$2 = tracker/9864
If matches.count>0 Then
 For Each match In matches
  groups = match.Groups ' parenthesis 1 and 2
  iProperties.Value("Project", "Revision Number") = groups.item(2).Value
  iProperties.Value("Project", "Description") = groups.item(1).Value
  MsgBox("iProperties set to " & groups.item(1).Value & " and " & groups.item(2).Value)
 Next
 Else
 MsgBox("No match!")
End If

Podobně můžete modifikovat rozpisku, výkresové texty, apod. Regulární výraz si upravte podle potřeby nebo kontaktujte CAD Studio pro pomoc.

Viz též jednodušší Tip 12431

Inventor
100% *  CAD 
16.7.2013    3007×  
font ilogic skupina součást text
 
Související CAD produkty:
platí pro: Inventor ·

Zpět   Všechny další tipy



Pomohl vám tento tip? Provoz služby CADForum.cz podpoříte i nákupem produktů Autodesk u provozovatele tohoto serveru a Platinum partnera Autodesku, firmy CAD Studio.
Můžete si také přidat odkaz na vaše stránky: CAD Fórum - diskuze, tipy, bloky a utility
CAD:    OS:    Kateg: 
Text:  FAQ   






Tipy a triky prosím využívejte na vlastní zodpovědnost.
Provozovatel (CAD Studio s.r.o.) nenese odpovědnost za případné potíže vzniklé v souvislosti s použitím kteréhokoliv z uvedených tipů.
Pro plné zvládnutí dané aplikace doporučujeme absolvování některého z nabízených CAD školení.
Další publikování obsahu je dovoleno jen se souhlasem autora.
TOPlist