OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Corel User Forums > CorelDRAW > Feature requests/wishlist

Reply
 
Thread Tools Search this Thread Display Modes
  #31  
Old 07-05-2010, 16:03
gorgo2 gorgo2 is offline
Senior Member
 
Join Date: Feb 2010
Posts: 107
Default

Quote:
Originally Posted by runflacruiser View Post
Quick try the h,w, or area options and see if they will work for you.

Hmm. But no email.

-John
Yes. h,w options work better. some things I want to stay get deleted but at least no lockups or errors. Maybe I'm asking for too much. You've gone this far and this is still a useful macro but it requires some configuring by the user to remove the bits and keep the goods.

The e-mail was sent now...was a problem earlier.
-Greg
Reply With Quote
  #32  
Old 07-05-2010, 16:07
gorgo2 gorgo2 is offline
Senior Member
 
Join Date: Feb 2010
Posts: 107
Default

Ha....it turns out I could have used Jeff's Select same (great tool). I was able to select the small bits according to the options and BOOM! The user can choose either the DeleteSmallObjects or SelectSame macros to get what they want in order to clean up CAD files. What do you think?
Reply With Quote
  #33  
Old 07-05-2010, 16:59
runflacruiser's Avatar
runflacruiser runflacruiser is offline
Senior Member
 
Join Date: Jun 2009
Location: Pigeon Forge, TN USA
Posts: 811
Default

Hi.
The select same is nice but I find that with large amounts of items it takes a long time to process. Mainly because the code is very, very old. I helped adapt that macro for newer version but it still has the same "engine" so to speak.

A completely new re-write/new macro would not only be much easier to code now-a-days but also be much, much faster.

Shelby has suggested some ideas(coming soon) for the small objects macro that not only fix the bug, but make it work even faster. This will make it the ideal choice for your situation...I think.

-John
Reply With Quote
  #34  
Old 07-05-2010, 17:14
gorgo2 gorgo2 is offline
Senior Member
 
Join Date: Feb 2010
Posts: 107
Default

Quote:
Originally Posted by runflacruiser View Post
Hi.
The select same is nice but I find that with large amounts of items it takes a long time to process. Mainly because the code is very, very old. I helped adapt that macro for newer version but it still has the same "engine" so to speak.

A completely new re-write/new macro would not only be much easier to code now-a-days but also be much, much faster.

Shelby has suggested some ideas(coming soon) for the small objects macro that not only fix the bug, but make it work even faster. This will make it the ideal choice for your situation...I think.

-John
Awesome. I'll keep on the lookout.

-Greg
Reply With Quote
  #35  
Old 07-05-2010, 19:50
runflacruiser's Avatar
runflacruiser runflacruiser is offline
Senior Member
 
Join Date: Jun 2009
Location: Pigeon Forge, TN USA
Posts: 811
Default

As for the previous bug you can add this bitmap check.

Code:
If s.Type <> cdrBitmapShape Then '<<<<<< ADD THIS <<<<<<
            If s.Type <> cdrCurveShape Then
                s.ConvertToCurves
            End If
            For i = s.Curve.SubPaths.Count To 1 Step -1
                 If s.Curve.SubPaths(i).Length <= tol Then
                    s.Curve.SubPaths(i).Delete
                    removeSmallSubpaths1 = True
                 End If
             Next i
End If  '<<<<<< ADD THIS <<<<<<
-John
Reply With Quote
  #36  
Old 07-05-2010, 20:02
runflacruiser's Avatar
runflacruiser runflacruiser is offline
Senior Member
 
Join Date: Jun 2009
Location: Pigeon Forge, TN USA
Posts: 811
Default

oh.
Here's the gms.
And this one is re-worked a little. I separated methods into separate functions and added a blank space for Shelby's cql methods.
I don't think we can use the progress meter with those methods though.

-John
Attached Files
File Type: gms deleteSmallObjects.gms (46.0 KB, 341 views)
Reply With Quote
  #37  
Old 09-05-2010, 21:29
gorgo gorgo is offline
Senior Member
 
Join Date: Feb 2010
Posts: 169
Default

Quote:
Originally Posted by runflacruiser View Post
oh.
Here's the gms.
And this one is re-worked a little. I separated methods into separate functions and added a blank space for Shelby's cql methods.
I don't think we can use the progress meter with those methods though.

-John

Does this mean Shelby's got some goodies for this macro too?
I'll put this to the test Monday May 10. Cool deal!

-Greg
Reply With Quote
  #38  
Old 09-05-2010, 21:40
runflacruiser's Avatar
runflacruiser runflacruiser is offline
Senior Member
 
Join Date: Jun 2009
Location: Pigeon Forge, TN USA
Posts: 811
Default

I cleaned up the code alot.
cql methods are new to x3 and above(don't quote me on this fact).
I'll add em if I get a chance. Or Shelby can if he wants.
I haven't messed with cql much cause I'm a compatibility munger, but I think it's time to jump into it because of the ultimate power!
I want to add both methods to this macro.
the normal method, with a timer and the cql methods as well, with a timer (optional timer). I'm ready to do some comparing.

PS. You may want to uncomment the on error resume next, just incase. It's commented out in the function "removeSmallSubpaths1"

-John
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Global Macro delete Michael Cervantes CorelDRAW/Corel DESIGNER VBA 17 16-11-2010 08:11
Find and delete objects with no fill or outline keytecstaff CorelDRAW/Corel DESIGNER VBA 17 22-06-2010 23:34
Delete Segment macro addendum request Rakker New product ideas 1 18-10-2008 15:47
Delete matching objects click101 CorelDRAW/Corel DESIGNER VBA 2 02-06-2008 16:14
Delete small objects macro Jeff Harrison New product ideas 3 19-05-2007 12:19


All times are GMT -5. The time now is 15:12.


Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
Copyright © 2011, Oberonplace.com