• This forum is the machine-generated translation of www.cad3d.it/forum1 - the Italian design community. Several terms are not translated correctly.

colored table setting

  • Thread starter Thread starter Ally83
  • Start date Start date

Ally83

Guest
Bye to all,

as object in inventor (2013) is there a way to make the table automatically?
I have a piece that has yellow color a blue a green echoes away.... .

Is there a way to make him keep the colors during the table, instead of doing everything black?

If not automatically, what is the smartest way to do it?

the problem is that then on autocad with complex drawing all black is not simple to manage them!!

thanks to all:smile:
 
Ally83 said:
Bye to all,

as object in inventor (2013) is there a way to make the table automatically?
I have a piece that has yellow color a blue a green echoes away.... .

Is there a way to make him keep the colors during the table, instead of doing everything black?

If not automatically, what is the smartest way to do it?

the problem is that then on autocad with complex drawing all black is not simple to manage them!!

thanks to all:smile:
Click to expand...
When you put a view on the table, you have three buttons at the bottom right in the dialog box, where you can choose from view with or without hidden lines or color display even here with hidden edges or not.
 
inserting the view with the check on "shaded view" the object keeps the same colors of the 3d.
But if you expose in dwg, I don't think you can save the colored texture, but only the outline lines, you should check.
 
I know that function

but apart from the fact that during the export it makes me all black....

Then I would need to color only lines... .

The method I know is...property...color... .

but to make it for many elements is a very slow and long procedure
 
Good day to all, I also have a similar need but perhaps a little more complicated to solve. inventor 2016. in my assemblies to facilitate the recognition of the pieces I am accustomed to coloring them differently in 3d. when I make the table of the details I would like the color of the lines of the piece to be equal to those of the 3d. would be easily solved with the shaded view but at the same time would charge too the design of the color. I would like to bring back only the color of the line, do you think it is feasible?
 
I think it was this one, on very slow big asses.
Code: 
public sub changeviewedgecolortofacecolor()

dim invallsheets as sheets
dim invsheet as sheet
dim invdrawdoc as drawingdocument
dim answer

    

    set invdrawdoc = thisapplication.activedocument
    
   
    'on error resume next
    'debug.print "start"
    set invallsheets = invdrawdoc.sheets
    
    if invallsheets.count > 1 then
        answer = msgbox("ci sono " & invallsheets.count & " fogli: processo tutto?", vbyesno, "change colors")
        if answer = vbyes then
            for each invsheet in invallsheets
            debug.print "calling >1"
                call changesheetcolors(invsheet)
            next invsheet
        else
            'debug.print "calling 1"
            call changesheetcolors(invdrawdoc.activesheet)
        end if
        
    else
        call changesheetcolors(invdrawdoc.activesheet)
    end if
end sub

private sub changesheetcolors(invsheet as sheet)
    dim invallviews as drawingviews
    dim invcurrview as drawingview

    dim invallcurves as drawingcurvesenumerator
    dim invcurve as drawingcurve
    dim invallsegs as drawingcurvesegments
    dim invseg as drawingcurvesegment
    dim objgen as object
    dim invrenderst as renderstyle
    dim invface as face
    dim bytred as byte
    dim bytgreen as byte
    dim bytblue as byte
    dim invcolor as color
    dim invto as transientobjects
    dim invedgeprx as edgeproxy
    dim invallfaces as faces


    on error resume next
    set invto = thisapplication.transientobjects
    set invcolor = invto.createcolor(255, 0, 0)
    
    set invallviews = invsheet.drawingviews
    for each invcurrview in invallviews
        set invallcurves = invcurrview.drawingcurves
        'debug.print "n° curve: " & invallcurves.count
        for each invcurve in invallcurves
            set invallsegs = invcurve.segments
            'debug.print "n° segmenti " & invallsegs.count
            for each invseg in invallsegs
                set objgen = invseg.parent.modelgeometry
                if (typeof objgen is edgeproxy) and (invseg.visible = true) then
                    'debug.print "trovata edgeproxy"
                    set invedgeprx = objgen
                    set invallfaces = invedgeprx.faces
                    'debug.print "edge proxy"
                    'debug.print "n° " & invallfaces.count & " facce"
                    for each invface in invallfaces
                        set invrenderst = invface.getrenderstyle(koverriderenderstyle)
                        if not invrenderst is nothing then
                            invrenderst.getambientcolor bytred, bytgreen, bytblue
                            'debug.print "red: " & bytred
                            'debug.print "green: " & bytgreen
                            'debug.print "blue: " & bytblue
                            invcolor.setcolor bytred, bytgreen, bytblue
                            invcurve.overridecolor = invcolor
                            invcurve.lineweight = 0.05
                        end if
                    next invface
                else
                    if (typeof objgen is faceproxy) and (invseg.visible = true) then
                        set invface = objgen
                        set invrenderst = invface.getrenderstyle(koverriderenderstyle)
                        debug.print "red: " & bytred
                            debug.print "green: " & bytgreen
                            debug.print "blue: " & bytblue
                            invcolor.setcolor bytred, bytgreen, bytblue
                            invcurve.overridecolor = invcolor
                            invcurve.lineweight = 0.05
                    end if
                end if
                
                'if (typeof objgen is ) then
                '   debug.print "trovati!"
                'end if
               
            next invseg
        next invcurve
    next invcurrview
end sub
 
I attach myself to this discussion for a similar need.

in the view of a set I would like one of the components to look shady like 3d while others should be represented as a normal table.

Is it feasible?
How to do that?
 
TECNOMODEL said:
I attach myself to this discussion for a similar need.

in the view of a set I would like one of the components to look shady like 3d while others should be represented as a normal table.

Is it feasible?
How to do that?
Click to expand...
I'm thinking of a super-accrocchio: create a position representation without varying anything, a view representation where you leave visible only what interests you, on the table put your view "base" + the overlapping view with your representation of logging position and the representation of view that you have prepared and shaded style of representation.
 
It is not clear to me, probably because I still do not understand the very concept of representation of position, view etc.

I created the 2 representations, in the view on the table but "command" the visual representation.
If I choose that total I see everything, if I choose the one in which I only have the pieces to highlight I see only those.

or perhaps you intend to create 2 views and overlap them? But then I don't understand why to create the representation of the position.
 
in the aid:
create the make-up representation (which serves because otherwise it does not make you place the superimposed);
create the visual representation (in the example "to be highlighted") with the pieces that interest you

in the table:
piazzi la vista base
the superimposed; in the window choose the view that you want to associate with the location representation; selections of the "shaded" style

If you could accurately overlay normal views (I don't know how to do it) all this wouldn't help, but it's not even too complicated, go!
 

Attachments

  • Esempio Sovrapposta.webp
    Esempio Sovrapposta.webp
    25 KB · Views: 13
I still take advantage if I want to change color to the component?

I tried to do it in the axieme, in the visual representation in which I only have the components to be highlighted but it does not work.
keeps me the aspects of the material.
 
you have to "view" the chain immediately under the combobox of choice of view representation so as to make associative views in the model and at the table; If not, the one used for insertion is fixed on the table. Try to make the red stake, it works.
 
Okay, thanks again.

I have a last question (spero): the view is ok, when mold though it is as if the square of the superimposed view erases me the view that it has under.

I only happen in print, already from the preview window. I see everything in the table.
 
Okay, yeah, the position rapp view wins that base: I solved by reversing the views, that is the basic view uses the rapp. "to be highlighted" with shading, that position uses the default rapp. without shading and layer "as parts" (to not have the ghost lines).
 
there is a small defect even in this solution.
the particular shaded is semi-transparent and you see the lines of the detail below.

Unfortunately it is a thing that goes on a catalog, you know how commercials are:wink:
 
Catafratto said:
I think it was this one, on very slow big asses.
Code: 
public sub changeviewedgecolortofacecolor()

dim invallsheets as sheets
dim invsheet as sheet
dim invdrawdoc as drawingdocument
dim answer

    

    set invdrawdoc = thisapplication.activedocument
    
   
    'on error resume next
    'debug.print "start"
    set invallsheets = invdrawdoc.sheets
    
    if invallsheets.count > 1 then
        answer = msgbox("ci sono " & invallsheets.count & " fogli: processo tutto?", vbyesno, "change colors")
        if answer = vbyes then
            for each invsheet in invallsheets
            debug.print "calling >1"
                call changesheetcolors(invsheet)
            next invsheet
        else
            'debug.print "calling 1"
            call changesheetcolors(invdrawdoc.activesheet)
        end if
        
    else
        call changesheetcolors(invdrawdoc.activesheet)
    end if
end sub

private sub changesheetcolors(invsheet as sheet)
    dim invallviews as drawingviews
    dim invcurrview as drawingview

    dim invallcurves as drawingcurvesenumerator
    dim invcurve as drawingcurve
    dim invallsegs as drawingcurvesegments
    dim invseg as drawingcurvesegment
    dim objgen as object
    dim invrenderst as renderstyle
    dim invface as face
    dim bytred as byte
    dim bytgreen as byte
    dim bytblue as byte
    dim invcolor as color
    dim invto as transientobjects
    dim invedgeprx as edgeproxy
    dim invallfaces as faces


    on error resume next
    set invto = thisapplication.transientobjects
    set invcolor = invto.createcolor(255, 0, 0)
    
    set invallviews = invsheet.drawingviews
    for each invcurrview in invallviews
        set invallcurves = invcurrview.drawingcurves
        'debug.print "n° curve: " & invallcurves.count
        for each invcurve in invallcurves
            set invallsegs = invcurve.segments
            'debug.print "n° segmenti " & invallsegs.count
            for each invseg in invallsegs
                set objgen = invseg.parent.modelgeometry
                if (typeof objgen is edgeproxy) and (invseg.visible = true) then
                    'debug.print "trovata edgeproxy"
                    set invedgeprx = objgen
                    set invallfaces = invedgeprx.faces
                    'debug.print "edge proxy"
                    'debug.print "n° " & invallfaces.count & " facce"
                    for each invface in invallfaces
                        set invrenderst = invface.getrenderstyle(koverriderenderstyle)
                        if not invrenderst is nothing then
                            invrenderst.getambientcolor bytred, bytgreen, bytblue
                            'debug.print "red: " & bytred
                            'debug.print "green: " & bytgreen
                            'debug.print "blue: " & bytblue
                            invcolor.setcolor bytred, bytgreen, bytblue
                            invcurve.overridecolor = invcolor
                            invcurve.lineweight = 0.05
                        end if
                    next invface
                else
                    if (typeof objgen is faceproxy) and (invseg.visible = true) then
                        set invface = objgen
                        set invrenderst = invface.getrenderstyle(koverriderenderstyle)
                        debug.print "red: " & bytred
                            debug.print "green: " & bytgreen
                            debug.print "blue: " & bytblue
                            invcolor.setcolor bytred, bytgreen, bytblue
                            invcurve.overridecolor = invcolor
                            invcurve.lineweight = 0.05
                    end if
                end if
                
                'if (typeof objgen is ) then
                '   debug.print "trovati!"
                'end if
               
            next invseg
        next invcurve
    next invcurrview
end sub
Click to expand...
thank you, but if you already tell me that would be very slow unfortunately I am already cut out... Of course, I think it might be something that would interest many... or at least I think
 
TECNOMODEL said:
there is a small defect even in this solution.
the particular shaded is semi-transparent and you see the lines of the detail below.

Unfortunately it is a thing that goes on a catalog, you know how commercials are:wink:
Click to expand...
finite le idee, sorry... :redface:
 

Forum statistics

Threads
44,997
Messages
339,767
Members
4
Latest member
ibt

Members online

No members online now.
Total: 23 (members: 0, guests: 23)
Back
Top