inventor BOM表縮略圖

智周·未來

      用inventor自帶的BOM表導出的物料BOM表，里面有一欄是零件的縮略圖，縮略圖的背景色是零件最后一次保存的底色，在實際打印出來后，有淺灰色的底色，零件的縮略圖會相對模糊，在最后一次保存前將背景色調成純白色再保存，打印出來的縮略圖就沒有了底色了，零件圖會顯得很清晰。

     但是，每次保存零件前都要更改背景色非常的麻煩，若是不去更改背景色，就一直使用純白色的背景色，眼睛會很疲勞。
2 Y  i4 j7 L  H     求教各位老師，能不能在任意背景色下保存的零件，導出到BOM表后的縮略圖仍然是無底色的，要怎么設置呢？

做鋼的

所以你可以單獨保存一個裝配文件，專門用來打印bom表的，這份裝配文件的背景色設置成白色。以后有修改就覆蓋這份文件，這不就快了嗎

遠祥

在首選項里面設置一下吧

艾知道人

樓主問題解決了嗎？我也遇到這個麻煩。

艾知道人

我已找到解決辦法，用ilogic，明天有空傳上來

艾知道人

解決縮略圖背景的ILOGIC文件。百度網盤鏈接：https://pan.baidu.com/s/1miOcXiE_5psz5jBtBQCtNg
  M7 u" Y+ \( ]+ J% x  Z" w9 [提取碼：asdf

艾知道人

樓下的網盤鏈接如失效，請復制以下ILOGIC代碼。
'thanks for Autodesk rocky God giving me help!    The code comes from the official forum of Autodesk in the United States，by Curtis_W
( K4 A- P: ^. |# g& i- Q
" O; A% a( A1 U9 B7 G8 f, W'獲取當前的顏色方案名稱
oColorScheme = ThisApplication.ActiveColorScheme.Name
1 F. i% n$ ~* ]( e* N$ T
, m% o7 b6 _: b+ V7 x5 c+ ]3 W$ Y, F'獲取當前配色方案背景類型
: `1 \. t4 X  k7 ^" a3 [# e) z+ u  yoBackGroundType = ThisApplication.ColorSchemes.BackgroundType
8 M  d# t  X: ?- {
0 ~; l) B7 D! H4 i. {'更改為演示文稿(白色背景)
ThisApplication.ColorSchemes.Item("表達視圖").Activate

'設置為使用一種顏色背景類型
. f4 m! k: c# {) ^ThisApplication.ColorSchemes.BackgroundType =BackgroundTypeEnum.kOneColorBackgroundType
# a+ Q3 Y1 i' a$ z3 QDim ooDoc=ThisDoc.Document
If ooDoc.DocumentType= kPartDocumentObject Then GoTo AA
' _. S& A1 v% B+ V# t5 |Dim oAsmDoc As AssemblyDocument
oAsmDoc = ThisApplication.ActiveDocument
/ i% k8 V' t& l% A3 [3 j. Y& K  z# cDim oDoc As Document
Dim oRefFile As FileDescriptor
. R7 [" p9 v" [8 h
& u( x3 [; ?4 Y+ W
& q- |& d/ U3 l7 z9 pFor Each oDoc In oAsmDoc.AllReferencedDocuments
        ThisApplication.Documents.Open(oDoc.FullFileName, True)  
        
7 p4 h5 ]9 [: T5 Z        For Each oSketch In oDoc.ComponentDefinition​.Sketches
                oSketch.Visible = False
        Next
2 y/ v  }6 o$ {8 y, U. C  h( e- m2 z+ H        
0 z. J/ g' S- X9 t- ]        '設置工作平面能見度
        For Each oWorkPlane In oDoc.ComponentDefinition.WorkPlanes
% m7 S6 a+ W* I9 o2 k9 L        oWorkPlane.Visible = False
        Next
) i; q; t  L: [) U* x$ Y# x4 S  K        
/ N' q2 Z( w9 S        '設定工作軸能見度
        For Each oWorkAxis In oDoc.ComponentDefinition.WorkAxes
5 s4 M, p+ F' Z) o& H4 Z        oWorkAxis.Visible = False
) W' _" u6 y' v& C. n  e  Y        Next
# V+ W. l9 h8 ^0 r        
* D. j: h: B% X& p8 W( X1 I        '設定工作點可見性
6 g& E$ ]6 P4 s* a2 i4 V0 z        For Each oWorkPoint In oDoc.ComponentDefinition.WorkPoints
* y5 n) B' u, y6 d, B1 g3 B/ k        oWorkPoint.Visible = False
* G+ ^3 J, E0 K( _        Next
. [" L5 `7 I# |- [
        '設置iproperty在保存時使用ISO視圖
        oDoc.SetThumbnailSaveOption _
        (ThumbnailSaveOptionEnum.kActiveComponentIsoViewOnSave)
        
: ?. O* k3 A5 \6 W7 E        '嘗試保存
, E1 ~4 M/ e; I        Try
# G6 r" r) K) o+ U        oDoc.Save
2 S5 E  T1 v# x( g  ^# n. h        Catch
6 M' }6 F& d, }4 p8 ^        '捕獲錯誤而不做任何事情
        End Try
        
' a) ], N  R( o% ]/ f- O+ a+ Q& b        '關閉文件
6 k  @5 p+ j$ y) B+ x  [        oDoc.Close
4 k* k& H: p0 g5 rNext
AA:For Each oSketch In ooDoc.ComponentDefinition​.Sketches
                oSketch.Visible = False
; q+ O1 [/ y6 s# M" l        Next
        
/ Y* |4 V/ Z9 U& s' y        '設置工作平面能見度
        For Each oWorkPlane In ooDoc.ComponentDefinition.WorkPlanes
3 c7 ]8 x: v8 e! g; z: K        oWorkPlane.Visible = False
        Next
' h/ \! V: O4 ]: P        
        '設定工作軸能見度
        For Each oWorkAxis In ooDoc.ComponentDefinition.WorkAxes
        oWorkAxis.Visible = False
6 {2 P. z! H0 O2 C        Next
3 a' }( R% W1 l; _, K  A0 j        
        '設定工作點可見性
7 a2 O2 n1 B/ r        For Each oWorkPoint In ooDoc.ComponentDefinition.WorkPoints
        oWorkPoint.Visible = False
        Next

        '設置iproperty在保存時使用ISO視圖
+ e# X. c, N  e7 Y% {- x- `0 o4 i4 i        ooDoc.SetThumbnailSaveOption _
        (ThumbnailSaveOptionEnum.kActiveComponentIsoViewOnSave)
: D  q5 J. y7 l. y        
        '嘗試保存
        Try
; e# f; t3 J( d( E+ r        ooDoc.Save
        Catch
1 d# K- w" A& j  U1 Z  @        '捕獲錯誤而不做任何事情
0 e4 f6 H! W$ b$ Z" Q4 L8 @        End Try
        
) ~) C& c# U9 l2 `9 l; @        '關閉文件
9 `2 @, H' ~! D. \  B5 g. h'        ooDoc.Close
, E" P0 D; }* E, o, d$ d& ^. O
5 e4 l5 a0 e/ U& ^: v, m'改回原來的方案
1 ^! {* I9 M; [ThisApplication.ColorSchemes.Item(oColorScheme).Activate

# ]6 q$ y4 o) A2 c4 b) H) s'改變回原來的背景地面類型
ThisApplication.ColorSchemes.BackgroundType = oBackGroundType
2 ^5 j0 j1 @+ P2 r( |* {