Hello! I am doing research using MATLAB and ran into a problem. When increasing "outline width of object" of rows of 4-object asterisks (composed of four lines) in CORELDRAW after transferring the objects from the MATLAB program, the lines are significantly enlarged and the asterisk shape is lost. Changing each individual object size and width fixes this shape issue without displacement, but takes forever. Trying to alter these asterisks as groups displaces the asterisks from their trendlines, which is not kosher. I can't seem to find an already published answer to this problem. Please let me know if any more information is needed to prevent this displacement. Thank you very much for your time!
Pictures:
I'm a little bit confused about exactly what you are trying to do.
After you bring the content from MATLAB into CorelDraw:
Thank you, that helps to clarify it for me!
I don't know if there is any way to increase the size of all of the asterisks, either grouped together, or all selected at the same time, without changing the locations of their centers. I can think of some ways to make the repetitive work go more quickly. You might already know of these, but I can't know that for sure, so...
One way to do it:
Another way to do it:
You can look at this thread and try to use some macro mentioned there
https://community.coreldraw.com/talk/coreldraw_graphics_suite_x4/f/246/p/47269/226475#226475
Mek said: You can look at this thread and try to use some macro mentioned there https://community.coreldraw.com/talk/coreldraw_graphics_suite_x4/f/246/p/47269/226475#226475
Mek's suggestion to consider a macro is a very good idea.
I'd never tried working with VBA in CorelDraw before, but starting with code that Mek posted in that thread, and then picking up some other bits elsewhere on-line, I came up with this:
--------------------------------------------------------------------------------------
Sub Scale_Centered_X_and_Y()Dim sr As ShapeRange, s As Shape, xc#, yc#, sc#Set sr = ActiveSelectionRangeActiveDocument.BeginCommandGroup "Scale centered X and Y"On Error GoTo ErrHandlersc = InputBox("scale (%)") / 100For Each s In sr xc = s.CenterX yc = s.CenterY s.SetSize s.SizeWidth * sc, s.SizeHeight * sc s.CenterX = xc s.CenterY = ycNext sExitSub:ActiveDocument.EndCommandGroupExit SubErrHandler:MsgBox "Error occured: " & Err.DescriptionResume ExitSubEnd Sub
If I select one or more objects, then run this, each object (or group of objects) retains its center position after scaling.
If other forum members with more macro experience see any "bad practices" in what I wrote above, then please educate me! My experience is very limited, but this little exercise has opened my eyes to some of the ways in which I might be able to automate some really tedious tasks. I am eager to learn.