OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Search Forums

Showing results 1 to 25 of 44
Search took 0.02 seconds.
Search: Posts Made By: ager
Forum: CorelDRAW/Corel DESIGNER VBA 17-05-2018, 05:27
Replies: 5
Views: 2,214
Posted By ager
Thanks for the answers. But my function works...

Thanks for the answers. But my function works with objects which type is "Shape", not "ShapeRange". As I understand, the object "Shape" can not give the information about number of shapes it really...
Forum: CorelDRAW/Corel DESIGNER VBA 16-05-2018, 22:00
Replies: 5
Views: 2,214
Posted By ager
No, the object "s" continues to exist. I do not...

No, the object "s" continues to exist. I do not delete it. So, the question is how to determine how many shapes are contained in the object "s".
Forum: CorelDRAW/Corel DESIGNER VBA 08-05-2018, 03:47
Replies: 5
Views: 2,214
Posted By ager
Count of shapes

For example, I have two selected any shapes.


Sub test()
Dim s as shape
Set s=ActiveShape
ActiveDocument.ClearSelection
'How to know count of the shapes in 's'?
End Sub
Forum: CorelDRAW/Corel DESIGNER VBA 24-10-2017, 22:06
Replies: 4
Views: 1,790
Posted By ager
sorry for the late answer

Sub touch()
Dim sr As ShapeRange, s As Shape, i As Long, k As Long, Xi As Double, Yi As Double
Set sr = ActiveSelectionRange
If sr.Count <> 2 Then Exit Sub
Set s = sr(1).Weld(sr(2))

With...
Forum: CorelDRAW/Corel DESIGNER VBA 19-10-2017, 03:56
Replies: 3
Views: 1,481
Posted By ager
Array of the coordinates

Join to the question.
How quickly to get coordinates of ALL nodes of the curve as a array (without using a cycle for...next)?
Forum: CorelDRAW/Corel DESIGNER VBA 18-03-2017, 02:29
Replies: 6
Views: 2,583
Posted By ager
Thumbs up Amazing! It works! I would never have guessed....

Amazing! It works! I would never have guessed. Thanks Shark
Forum: CorelDRAW/Corel DESIGNER VBA 17-03-2017, 06:29
Replies: 6
Views: 2,583
Posted By ager
Thank you Shark for the answers (greetings from...

Thank you Shark for the answers (greetings from Siberia :) )!
Begin/EndCommandGroup helps a little. In some cases adding "EventsEnabled=True/False" can help, but phantom objects can appear again.
Forum: CorelDRAW/Corel DESIGNER VBA 16-03-2017, 21:32
Replies: 6
Views: 2,583
Posted By ager
Yes, of course. Without optimization it's working...

Yes, of course. Without optimization it's working fine. But if I'm deal with quite complex group consisting of many shapes the optimization is extremely desirable
Forum: CorelDRAW/Corel DESIGNER VBA 15-03-2017, 23:43
Replies: 6
Views: 2,583
Posted By ager
Optimization and phantom object

If you execute this code for any group shapes:

Dim sr As ShapeRange
Set sr = ActiveSelectionRange
If sr.Shapes.Count < 1 Then Exit Sub
Optimization = True
sr.Ungroup
...
Forum: CorelDRAW/Corel DESIGNER VBA 02-09-2016, 07:19
Replies: 11
Views: 13,755
Posted By ager
Is this forum still alive?

I found out how to solve my problem using a crutch (speaking in Russian :) ):

Dim FOp as Variant, FileAr as Variant

With CreateObject("Excel.Application")
FOp =...
Forum: CorelDRAW/Corel DESIGNER VBA 24-08-2016, 05:49
Replies: 11
Views: 13,755
Posted By ager
x64

A question to Shelby again!
How to make working version of this code for CorelDRAW 64-bit? I try to use PtrSafe and LongPtr, but it does not help.
Forum: CorelDRAW/Corel DESIGNER VBA 01-06-2015, 23:18
Replies: 0
Views: 2,081
Posted By ager
Curve Element

Explain me, please, what does the parameter "flags" mean in CurveElement object?
There is no any descripton of this parameter in the VBA Help
Forum: CorelDRAW/Corel DESIGNER VBA 24-04-2015, 00:49
Replies: 12
Views: 8,332
Posted By ager
Licenses for this component

If problem is absence of license information for ActiveX component in the registry of Win8, this file can helps you
Forum: CorelDRAW/Corel DESIGNER VBA 17-04-2015, 07:25
Replies: 0
Views: 2,156
Posted By ager
Color.UserAssignEx dialog

How to set old color parameters? When I use UserAssignEx function it always sets old color parameters on the color-dialog window to 0, 0, 0, 100 (CMYK).
Forum: CorelDRAW/Corel DESIGNER VBA 01-04-2015, 04:46
Replies: 5
Views: 3,336
Posted By ager
Thank you for the help, ddonnahoe. But my...

Thank you for the help, ddonnahoe. But my pictures are not parts of photo and there are a lot of them (about 200). So, PHOTO-PAINT is not suitable for me. It is easier to stitch them manually :)
Forum: CorelDRAW/Corel DESIGNER VBA 30-03-2015, 22:02
Replies: 5
Views: 3,336
Posted By ager
ddonnahoe, The problem is how to join bitmap...

ddonnahoe,
The problem is how to join bitmap images. RasterStitch program works similar. These images are small fragments of one big picture. I think that I need to use CorelScript tool but I don't...
Forum: CorelDRAW/Corel DESIGNER VBA 30-03-2015, 01:12
Replies: 5
Views: 3,336
Posted By ager
Color of each pixel in bitmap

How to get color and X,Y-coordinates of each pixel in selected bitmap shape?
There is Eyedropper tool but it doesn't work in VBA.
Forum: CorelDRAW/Corel DESIGNER VBA 26-02-2015, 23:09
Replies: 2
Views: 2,083
Posted By ager
Thank you, Shelby, for the explanation! Late...

Thank you, Shelby, for the explanation!
Late Binding works as well as adding the reference.
Forum: CorelDRAW/Corel DESIGNER VBA 26-02-2015, 21:49
Replies: 2
Views: 2,083
Posted By ager
References...

How to add a new reference in macro from Tools>References> (in VB-editor) using programm code?
For example, I want to use msdao15.dll from "common files\system\ado"
There is simple function in...
Forum: CorelDRAW/Corel DESIGNER VBA 08-07-2014, 22:59
Replies: 0
Views: 1,769
Posted By ager
Personal texture fill

How to create personal texture fill with CorelDraw VBA?
For example, I want to create texture fill from array. This array contains 3 set of values: X-coordinate, Y-coordinate and Color-code. After...
Forum: CorelDRAW/Corel DESIGNER VBA 14-01-2014, 04:00
Replies: 2
Views: 2,414
Posted By ager
Hmm... On my version of CorelDraw X4 it looks ...

Hmm... On my version of CorelDraw X4 it looks like this: :icon_frow
Forum: CorelDRAW/Corel DESIGNER VBA 09-01-2014, 00:22
Replies: 2
Views: 2,414
Posted By ager
Is IsPointInside incorrected function?

If you download attached file and run this macro, applying to the figure from the file, you discover a sad mistake in "IsPointInside" function

Dim x As Double, y As Double, b As Boolean, s As...
Forum: CorelDRAW/Corel DESIGNER VBA 20-11-2013, 02:16
Replies: 7
Views: 3,949
Posted By ager
MetaData

SteveDude, the volume of data is too big for CDR's comments field. The TXT-file has about 1000 lines of x and y data. My macro works in CDR-file and draws a chart using data from the TXT-file. The...
Forum: CorelDRAW/Corel DESIGNER VBA 17-11-2013, 20:09
Replies: 7
Views: 3,949
Posted By ager
MetaData

Ddonnahoe, may be I don't exactly explain my idea. The specific purpose is drawing chart with my macro. The data of this chart are in txt-file, which consist of two columns (x-data and y-data). With...
Forum: CorelDRAW/Corel DESIGNER VBA 15-11-2013, 03:29
Replies: 7
Views: 3,949
Posted By ager
MetaData

OK, thank you very much, Shelbym!
I just want to embed a large data-text file in cdr-file. And I'm afraid that this method not quite what me need.
Showing results 1 to 25 of 44

 
Forum Jump

All times are GMT -5. The time now is 00:34.


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