Ungrouping Extrudes? Not possible?

[RussU]

Hi everyone. this is just a quick workflow query really, rather than an issue or a bug.

 

When you work in 3d, adding subtrating and so on, it's really handy to have one version which is as modelled, but then I like to take a boolean shape and go back to the primitives... with most objects you can just go "ungroup" to your hearts content until you get back to source.... But with extrudes you can't. you need to go into the extrude and then copy/paste the shape out.

 

Main reason is, when you're viewporting the 3d extrude, the circles, curves and drills come out multi-faceted according to your 3d conversion res setting.... but I'd like to display them in drawings as true curves. (This would allow associative dimensions to be used also, expecially hole diameter and so on.... instead, I'm taking a 3d viewport and overlaying real circles onto the flattened 3d and appying centre-marks, dims etc...

 

Is my workflow missing a trick or two here? I suspect it is!

[Pat Stanford]

How about another script. This will work best for objects in Top/Plan and not moved since they were extruded.

 

Procedure ExtractExtrudeSource;

{Novemeber 30, 2016}
{© 2016, Pat Stanford pat@coviana.com}
{Licensed under the GNU Lesser General Public License}

{Extracts the 2D source geometry of a simple Extrude with a single source}
{Select an Extrude and run the script. Deselects the Extrude and}
{selects the extracted source object. If run on multiple selected}
{objects the stacking order determines which is first and extracted}
{Gets the original source geometry. Does not get the poly equivalent to}
{the current view of the extrude. Extrudes that have been moved after
{Creation will have the Source Object located at the original creation}
{point. Creates a Layer Plane Object }

Var	Source:Handle;

Begin
	Source:=CreateDuplicateObject(FInGroup(FSActLayer),ActLayer);
	DSelectAll;
	SetSelect(Source);
End;

Run(ExtractExtrudeSource);

 

[bcd]

You're a scripting beast today Pat!

[RussU]

Absolute Jedi Pat!

 

Ideally, it would be nice if SLVPs displayed the source geometry of the extrude, so that you can get nice circles and curves without the faceting.

but for the needs I have at the moment (extracting geometry for laser cutters) this script is great.

Thank you