Forum: CorelDRAW/Corel DESIGNER VBA
17-05-2018, 05:27
|
|
Replies: 5
Views: 6,799
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: 6,799
|
|
Forum: CorelDRAW/Corel DESIGNER VBA
08-05-2018, 03:47
|
|
Replies: 5
Views: 6,799
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: 6,689
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: 5,279
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: 5,806
|
|
Forum: CorelDRAW/Corel DESIGNER VBA
17-03-2017, 06:29
|
|
Replies: 6
Views: 5,806
|
|
Forum: CorelDRAW/Corel DESIGNER VBA
16-03-2017, 21:32
|
|
Replies: 6
Views: 5,806
|
|
Forum: CorelDRAW/Corel DESIGNER VBA
15-03-2017, 23:43
|
|
Replies: 6
Views: 5,806
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: 24,498
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: 24,498
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: 3,530
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: 14,384
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: 3,521
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: 6,813
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: 6,813
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: 6,813
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: 3,615
|
|
Forum: CorelDRAW/Corel DESIGNER VBA
26-02-2015, 21:49
|
|
Replies: 2
Views: 3,615
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: 2,903
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: 4,415
|
|
Forum: CorelDRAW/Corel DESIGNER VBA
09-01-2014, 00:22
|
|
Replies: 2
Views: 4,415
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: 6,090
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: 6,090
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: 6,090
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.
|
