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ě čte: 6284 

CAD tip CAD tip # 11204:

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

Hromadná změna jednotek v celé sestavě Inventoru.

A - odpověď Pomocí následujícího makra iLogic můžete snadno změnit rozměrové jednotky ve všech součástech aktuální sestavy Inventoru - např. na mm a gramy:

question = MessageBox.Show("Opravdu chcete změnit jednotky v celé sestavě?", "iLogic", MessageBoxButtons.YesNo)
if question = vbYes then

' přednastavené jednotky
 oUOM1 = UnitsTypeEnum.kMillimeterLengthUnits ' nebo UnitsTypeEnum.kCentimeterLengthUnits
 oUOM2 = UnitsTypeEnum.kGramMassUnits ' nebo UnitsTypeEnum.kKilogramMassUnits
 oPrecision = 3

 dim openDoc as document
 openDoc = ThisDoc.Document
 openDoc.unitsofmeasure.LengthUnits = oUOM1 
 openDoc.unitsofmeasure.MassUnits = oUOM2
 openDoc.unitsofmeasure.LengthDisplayPrecision = oPrecision

 dim docFile as document 
 For Each docFile In openDoc.AllReferencedDocuments 
  ' jen součásti
   If docFile.DocumentType = kPartDocumentObject Then 
     dim FNamePos as long
     FNamePos = InStrRev(docFile.FullFileName, "\", -1)                         
     dim docFName as string  
     docFName = Right(docFile.FullFileName, Len(docFile.FullFileName) - FNamePos)       

     docFile.unitsofmeasure.LengthUnits = oUOM1
     docFile.unitsofmeasure.MassUnits = oUOM2
     docFile.unitsofmeasure.LengthDisplayPrecision = oPrecision

     docFile.Rebuild
   End If
 Next     
 iLogicVb.UpdateWhenDone = True

end if
Inventor
100% *  CAD 
5.12.2016    404×  
 
Související CAD produkty:
platí pro: Inventor ·

Zpět   Všechny další tipy

Účast modelu v pohledovém řezu či řezu na výkrese. « | » Úprava 2D zobrazení u rodin založených na hostitelské stěně.

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 a.s.) 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