Search the web
Sign In
New User? Sign Up
cdrvba · Corel Application Automation
? Already a member? Sign in to Yahoo!

Yahoo! Groups Tips

Did you know...
Show off your group to the world. Share a photo of your group with us.

Best of Y! Groups

   Check them out and nominate your group.
Having problems with message search? Fill out this form to ensure your group is one of the first to be migrated to the new message search system.

Messages

  Messages Help
Advanced
Messages 1072 - 1101 of 1101   Newest  |  < Newer  |  Older >  |  Oldest
Messages: Show Message Summaries   (Group by Topic) Sort by Date v  
#1101 From: cdrvba@yahoogroups.com
Date: Thu Jun 26, 2003 1:02 am
Subject: Reminder - CDRVBA Weekly Chat
cdrvba@yahoogroups.com
Send Email Send Email
 
We would like to remind you of this upcoming event.

CDRVBA Weekly Chat

Date: Thursday, June 26, 2003
Time: 9:00PM - 10:00PM EDT (GMT-04:00)

This weekly event is a good opportunity to discuss your current
issues/ideas live with other group members.

#1100 From: cdrvba@yahoogroups.com
Date: Fri Jun 20, 2003 12:02 am
Subject: Reminder - CDRVBA Weekly Chat
cdrvba@yahoogroups.com
Send Email Send Email
 
We would like to remind you of this upcoming event.

CDRVBA Weekly Chat

Date: Thursday, June 19, 2003
Time: 9:00PM - 10:00PM EDT (GMT-04:00)

This weekly event is a good opportunity to discuss your current
issues/ideas live with other group members.

#1099 From: cdrvba@yahoogroups.com
Date: Thu Jun 19, 2003 1:02 am
Subject: Reminder - CDRVBA Weekly Chat
cdrvba@yahoogroups.com
Send Email Send Email
 
We would like to remind you of this upcoming event.

CDRVBA Weekly Chat

Date: Thursday, June 19, 2003
Time: 9:00PM - 10:00PM EDT (GMT-04:00)

This weekly event is a good opportunity to discuss your current
issues/ideas live with other group members.

#1098 From: cdrvba@yahoogroups.com
Date: Fri Jun 13, 2003 12:02 am
Subject: Reminder - CDRVBA Weekly Chat
cdrvba@yahoogroups.com
Send Email Send Email
 
We would like to remind you of this upcoming event.

CDRVBA Weekly Chat

Date: Thursday, June 12, 2003
Time: 9:00PM - 10:00PM EDT (GMT-04:00)

This weekly event is a good opportunity to discuss your current
issues/ideas live with other group members.

#1097 From: cdrvba@yahoogroups.com
Date: Thu Jun 12, 2003 1:02 am
Subject: Reminder - CDRVBA Weekly Chat
cdrvba@yahoogroups.com
Send Email Send Email
 
We would like to remind you of this upcoming event.

CDRVBA Weekly Chat

Date: Thursday, June 12, 2003
Time: 9:00PM - 10:00PM EDT (GMT-04:00)

This weekly event is a good opportunity to discuss your current
issues/ideas live with other group members.

#1096 From: cdrvba@yahoogroups.com
Date: Fri Jun 6, 2003 12:03 am
Subject: Reminder - CDRVBA Weekly Chat
cdrvba@yahoogroups.com
Send Email Send Email
 
We would like to remind you of this upcoming event.

CDRVBA Weekly Chat

Date: Thursday, June 5, 2003
Time: 9:00PM - 10:00PM EDT (GMT-04:00)

This weekly event is a good opportunity to discuss your current
issues/ideas live with other group members.

#1095 From: cdrvba@yahoogroups.com
Date: Thu Jun 5, 2003 1:02 am
Subject: Reminder - CDRVBA Weekly Chat
cdrvba@yahoogroups.com
Send Email Send Email
 
We would like to remind you of this upcoming event.

CDRVBA Weekly Chat

Date: Thursday, June 5, 2003
Time: 9:00PM - 10:00PM EDT (GMT-04:00)

This weekly event is a good opportunity to discuss your current
issues/ideas live with other group members.

#1094 From: "Alex Vakulenko" <alexv@...>
Date: Thu Nov 28, 2002 2:22 pm
Subject: This list is frozen.
alexv1n
Offline Offline
Send Email Send Email
 
Hi everyone,

I'm now locking this list. Please continue your discussions on
http://www.oberonplace.com/forum/index.php

You will still be able to browse through archives of this list from
http://groups.yahoo.com/group/cdrvba but it will be closed for
posting.

Shortly I will move all the old messages to the online forum so you
will be able to see it there...

If you have any concerns, please let me know.

Alex

#1093 From: "Alex Vakulenko" <alexv@...>
Date: Thu Nov 28, 2002 2:18 pm
Subject: RE: VBA - IsOnShape behavior / HotArea
alexv1n
Offline Offline
Send Email Send Email
 
Andreas,

CorelDRAW uses integer mathematics inside, which means that the
coordinates cannot have just any values. They are discrete with 1/10th
of a micron steps (internal unit, or think of it as a "pixel" of that
size). This results is some rounding problems when you move to a very
fine (small) scales. Because of this, it is virtually impossible to hit
the outline of the object reliably. A "pixel" could be on the left of
the line while the next will already be to the right. In order to
resolve this, the following approach is implemented:

IsOnShape actually doesn't work with a point, but rather a small
rectangle: (x - h/2, y-h/2) - (x+h/2, y+h/2) where h is the HotArea you
specify. If the rectangle intersects an outline, the point is reported
as On Outline, If all the points are inside, then it is inside,
otherwise it is thought to be outside.

If HotArea is omitted, IsOnShape uses the screen zoom to imitate the
mouse clicks. The HotArea is chosen to be the size of (if I remember
correctly) 4 screen pixels in the current zoom.

As a result, if you want to test the exact point position, specify the
hot area of 0.

I hope this helps.

> I want to know if a point is inside or outside a shape.
>
> Therefore I'm using the following VBA-code:
>
>     If ActiveShape.IsOnShape(x, y) = cdrInsideShape Then ...
>
> My problem is that the results may be different if I use
> different zooms, eg.
>
> While the point is inside the shape ("cdrInsideShape") when using
>     ActiveWindow.ActiveView.Zoom = 50
> it might be outside ("cdrOutsideShape") the same shape when using
>     ActiveWindow.ActiveView.Zoom = 250
>
> Can anyone help?
>
> Does anybody know what the optional "HotArea"-Parameter of
> .IsOnShape(x,y,HotArea)
> does exactly as the help isn't too detailed on this?
>
> As far as I understand geometrics - if a point is outside a
> shape - it is outside - independent of the zoom.

Alex

#1092 From: "anhoff26" <unm6@...>
Date: Thu Nov 28, 2002 11:27 am
Subject: VBA - IsOnShape behavior / HotArea
anhoff26
Offline Offline
Send Email Send Email
 
Hi,
I want to know if a point is inside or outside a shape.

Therefore I'm using the following VBA-code:

     If ActiveShape.IsOnShape(x, y) = cdrInsideShape Then ...

My problem is that the results may be different if I use different
zooms, eg.

While the point is inside the shape ("cdrInsideShape") when using
     ActiveWindow.ActiveView.Zoom = 50
it might be outside ("cdrOutsideShape") the same shape when using
     ActiveWindow.ActiveView.Zoom = 250

Can anyone help?

Does anybody know what the optional "HotArea"-Parameter of
.IsOnShape(x,y,HotArea)
does exactly as the help isn't too detailed on this?

As far as I understand geometrics - if a point is outside a shape - it
is outside - independent of
the zoom.

Thanks in advance
Andreas

PS: I am using CorelDraw10 - German

#1091 From: "Craig Tucker" <craigtucker@...>
Date: Wed Nov 27, 2002 2:24 pm
Subject: Re: Oberon site moved
s_craig_tucker
Offline Offline
Send Email Send Email
 
Thanks Alex,
BTW, The new forum looks great!
----- Original Message -----
Sent: Wednesday, November 27, 2002 8:16 AM
Subject: RE: [cdrvba] Oberon site moved

Craig,

>     Congrats on your new site!  Is it possible to move the
> yahoogroup archive to your new forum?  When are you going to
> close this message board? There are some good discussions
> here I would not want to lose... Thanks, Craig...

Yes, I will move the messages to the forum in a couple days (at least
I'll try :)

Alex



To unsubscribe from this group, send an email to:
cdrvba-unsubscribe@yahoogroups.com



Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.

#1090 From: "Alex Vakulenko" <alexv@...>
Date: Wed Nov 27, 2002 2:16 pm
Subject: RE: Oberon site moved
alexv1n
Offline Offline
Send Email Send Email
 
Craig,

>     Congrats on your new site!  Is it possible to move the
> yahoogroup archive to your new forum?  When are you going to
> close this message board? There are some good discussions
> here I would not want to lose... Thanks, Craig...

Yes, I will move the messages to the forum in a couple days (at least
I'll try :)

Alex

#1089 From: "Craig Tucker" <craigtucker@...>
Date: Wed Nov 27, 2002 2:07 pm
Subject: Re: Oberon site moved
s_craig_tucker
Offline Offline
Send Email Send Email
 
Hi Alex,
     Congrats on your new site!  Is it possible to move the yahoogroup
archive to your new forum?  When are you going to close this message board?
There are some good discussions here I would not want to lose...
Thanks, Craig...

----- Original Message -----
From: "Alex Vakulenko" <alexv@...>
To: "cdrvba" <cdrvba@yahoogroups.com>
Sent: Tuesday, November 26, 2002 9:38 PM
Subject: [cdrvba] Oberon site moved


> Hi everyone,
>
> My site (www.vakcer.com/oberon) has moved to its own domain -
> http://www.oberonplace.com
>
> I have created online forums on the site. The forums have boards devoted
to
> VBA/CorelScript programming and as such I'm going to close this mailing
list
> shortly. Please move all the discussions to the forums at
> www.oberonplace.com
>
> You are welcome to check out the new site and let me know what you think.
>
> Alex
> www.oberonplace.com
>
>
>
>
> To unsubscribe from this group, send an email to:
> cdrvba-unsubscribe@yahoogroups.com
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>

#1088 From: "Alex Vakulenko" <alexv@...>
Date: Wed Nov 27, 2002 3:38 am
Subject: Oberon site moved
alexv1n
Offline Offline
Send Email Send Email
 
Hi everyone,

My site (www.vakcer.com/oberon) has moved to its own domain -
http://www.oberonplace.com

I have created online forums on the site. The forums have boards devoted to
VBA/CorelScript programming and as such I'm going to close this mailing list
shortly. Please move all the discussions to the forums at
www.oberonplace.com

You are welcome to check out the new site and let me know what you think.

Alex
www.oberonplace.com

#1087 From: "Alex Vakulenko" <alexv@...>
Date: Mon Nov 25, 2002 4:45 pm
Subject: Re: Alex's Site
alexv1n
Offline Offline
Send Email Send Email
 
> Alex's website seems to be down.  I was wondering if someone would
be
> willing the email me his Oberon Function Plotter for Draw 11.

The web site was down for several days but now it is back online.
Sorry for the trouble...

Alex

#1086 From: Roy Brewer <roy@...>
Date: Sat Nov 23, 2002 1:56 pm
Subject: RE: Batch conversion HPGL-->EPS
roybrewer
Offline Offline
Send Email Send Email
 
I thought I remembered reading that, but could never find how to do it!

What a value this NG is!

Roy Brewer

At 04:11 PM 11/22/2002 -0500, you wrote:
>CorelDRAW 11 already includes a file conversion script. Go to
>Tools>Visual Basic>Play... and select FileConverter.gms module...
>
>This should do it.

#1085 From: "carlericjohnson" <D7CEJ01@...>
Date: Sun Nov 24, 2002 12:12 am
Subject: Corel Photo-Paint 10/11 VBA ImageBCI and GetFolder functions
carlericjohnson
Offline Offline
Send Email Send Email
 
Has anyone been able to get the any of the following to work from VBA
in Corel Photo-Paint 10 or 11:
1. ImageBCI - No matter what I've tried, there is no effect on the
active Image/Document.
2. GetFolder - Gives me a Runtime Error 445 - "Object doesn't support
this function".
3. ImageColorTone - Same results (nothing) as with ImageBCI.
4. The code block-
      BEGINWAITCURSOR
      WAIT FOR 30             (VBA doesn't like the keyword WAIT)
      ENDWAITCURSOR

I am in the process of converting Corel Photo-Paint 7 Scripts to VBA
and I have most of them working in Photo-Paint 10 (and Photo-Paint 11
trial), and it has been somewhat of a struggle.

The 4 items I listed are documented in both the Corel Photo-Paint 10
(and 11 trial) documentation, but no matter how many variations I've
tried, I cant get them to work.  Items 1 and 2 are especially
important to me.

I would appreciate if anyone has any ideas of what I may be doing
incorrectly or other things I might try to get around the problems.

  Thank You,
  Carl Eric Johnson

#1084 From: "Shelby L Moore" <shelbym@...>
Date: Sat Nov 23, 2002 10:57 pm
Subject: Alex's Site
mooreshelby
Offline Offline
Send Email Send Email
 
Alex's website seems to be down.  I was wondering if someone would be
willing the email me his Oberon Function Plotter for Draw 11.

Thanks!

Shelby

#1083 From: "Shelby L Moore" <shelbym@...>
Date: Fri Nov 22, 2002 10:58 pm
Subject: Re: Batch conversion HPGL-->EPS
mooreshelby
Offline Offline
Send Email Send Email
 
Alex you sure are fast today.  You beat me to the reply.

Shelby

#1082 From: "Alex Vakulenko" <alexv@...>
Date: Fri Nov 22, 2002 9:11 pm
Subject: RE: Batch conversion HPGL-->EPS
alexv1n
Offline Offline
Send Email Send Email
 
CorelDRAW 11 already includes a file conversion script. Go to
Tools>Visual Basic>Play... and select FileConverter.gms module...

This should do it.

> I have Alex's   v8 script, but would sure like to have it
> available in DRAW
> 10 or 11.
>
> Curious why this has not been upgraded to VBA; could it be
> that it is so
> easy in VBA that it hasn't been posted?
> If so, could someone give me a reference to get me started?
>
> This is what I'd really like:  dialog just like FILECONV8.CSC
> with the
> addition of a checkbox that would turn off the advanced
> dialog to let the
> conversions run unattended.
>
> WHile I'm thinking of it,  any way to turn off the dialog in
> DRAW8 before
> running the existing script?

This is also addressed in Draw11's file converter. You can set all the
properties before starting the export.

I hope this helps.

#1081 From: Roy Brewer <roy@...>
Date: Fri Nov 22, 2002 7:08 pm
Subject: Batch conversion HPGL-->EPS
roybrewer
Offline Offline
Send Email Send Email
 
I have Alex's   v8 script, but would sure like to have it available in DRAW
10 or 11.

Curious why this has not been upgraded to VBA; could it be that it is so
easy in VBA that it hasn't been posted?
If so, could someone give me a reference to get me started?

This is what I'd really like:  dialog just like FILECONV8.CSC with the
addition of a checkbox that would turn off the advanced dialog to let the
conversions run unattended.


WHile I'm thinking of it,  any way to turn off the dialog in DRAW8 before
running the existing script?

Thanks,



Roy Brewer
817/460-8122
817/469-8560 fax

http://www.brewersales.com

***  hpLap3 ****

#1080 From: "Alex Vakulenko" <alexv@...>
Date: Wed Nov 20, 2002 2:14 pm
Subject: Re: Status
alexv1n
Offline Offline
Send Email Send Email
 
I would just hide the status bar (statusbar.Visible = False) and show the
progress bar at the same position/coordinates as the status bar was (in its
place). When you are done, hide the progress bar and show the status bar
again.

Alex

----- Original Message -----
From: "Weisz Tamas" <giraffe@...>
To: <cdrvba@yahoogroups.com>
Sent: Wednesday, November 20, 2002 8:40 AM
Subject: Re: [cdrvba] Status


> I use VBA in Draw11

#1079 From: "Weisz Tamas" <giraffe@...>
Date: Wed Nov 20, 2002 1:40 pm
Subject: Re: Status
giraffe@...
Send Email Send Email
 
I use VBA in Draw11

Tamas

----- Original Message -----
From: <alexv@...>
To: <cdrvba@yahoogroups.com>
Sent: Wednesday, November 20, 2002 2:23 PM
Subject: Re: [cdrvba] Status


Do you use CorelScript or VBA?

> My program have to make a lot of things, so it works a long time. Can I
> anyway change Statusbar to "Processing" mode, and set its processing bar?

Alex

To unsubscribe from this group, send an email to:
cdrvba-unsubscribe@yahoogroups.com



Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/

#1078 From: "Alex Vakulenko" <alexv@...>
Date: Wed Nov 20, 2002 1:23 pm
Subject: Re: Status
alexv1n
Offline Offline
Send Email Send Email
 
Do you use CorelScript or VBA?

> My program have to make a lot of things, so it works a long time. Can I
> anyway change Statusbar to "Processing" mode, and set its processing bar?

Alex

#1077 From: "Weisz Tamas" <giraffe@...>
Date: Wed Nov 20, 2002 9:20 am
Subject: Status
giraffe@...
Send Email Send Email
 
Hello,

My program have to make a lot of things, so it works a long time. Can I
anyway change Statusbar to "Processing" mode, and set its processing bar?

Thanks,
Tamas

#1076 From: "Alex Vakulenko" <alexv@...>
Date: Wed Nov 20, 2002 5:02 am
Subject: CorelDRAW® Focus Survey
alexv1n
Offline Offline
Send Email Send Email
 
Hi everyone,

Corel has posted a quick survey on their web site to see where the next
CorelDRAW version will be going. There is a section in the survey devoted to
automation. If you could take 15 minutes of your time and participate in the
survey, that would be particularly useful. The future depends on you :)

You can find the survey here:
http://www.corel.com/draw11/focus_survey/index.htm

Thanks for participation.

Alex

#1075 From: "Alex Vakulenko" <alexv@...>
Date: Wed Nov 20, 2002 1:34 am
Subject: Re: Re: Killing Screen Redraw
alexv1n
Offline Offline
Send Email Send Email
 
Jim,

How about:

ActivePage.Shapes.All.SetOutlineProperties 0.005,....

This command can replace the whole loop you have there...

Should help a little bit more...

Alex

----- Original Message -----
From: "jimjwiley" <jwiley@...>
To: <cdrvba@yahoogroups.com>
Sent: Tuesday, November 19, 2002 4:51 PM
Subject: [cdrvba] Re: Killing Screen Redraw


> Here it is -
>
> Sub OutlineTo005Black()
>     Optimization = True
>     ActiveDocument.SaveSettings
>     ActiveDocument.PreserveSelection = False
>
>     Dim s As Shape
>     For Each s In ActiveDocument.ActivePage.Shapes
>         s.Outline.SetProperties 0.005, OutlineStyles(0),
> CreateCMYKColor(0, 0, 0, 100), ArrowHeads(0), ArrowHeads(0), False,
> False, cdrOutlineButtLineCaps, cdrOutlineRoundLineJoin, 0#, 100
>     Next s
>     ActiveDocument.RestoreSettings
>     Optimization = False
> End Sub
>
> It's very basic. It did go faster. For faster yet, I actually want it
> to just select all (SelectAll), but I am still getting oriented to
> VBA for CDR. (I have been doing some lite programming in Java,
> Javascript and VBA for Excel this last year).
>
> I am still trying to get the CDR help turned on fully (between doing
> actual work to meet todays deadlines). CDraw10 had alot more info
> displayed. Before D11, I was just modifing some of my old scripts
> with Ventura 8's script editor, but that was lost because our systems
> were completely rebuilt (disk imaged) for 7 software progs we
> upgraded a couple of weeks ago.
>
> Alex and others thanks again. This stuff is all good. It's great to
> find this NG.
>
> ~Jim

#1074 From: "jimjwiley" <jwiley@...>
Date: Tue Nov 19, 2002 9:51 pm
Subject: Re: Killing Screen Redraw
jimjwiley
Offline Offline
Send Email Send Email
 
Here it is -

Sub OutlineTo005Black()
     Optimization = True
     ActiveDocument.SaveSettings
     ActiveDocument.PreserveSelection = False

     Dim s As Shape
     For Each s In ActiveDocument.ActivePage.Shapes
         s.Outline.SetProperties 0.005, OutlineStyles(0),
CreateCMYKColor(0, 0, 0, 100), ArrowHeads(0), ArrowHeads(0), False,
False, cdrOutlineButtLineCaps, cdrOutlineRoundLineJoin, 0#, 100
     Next s
     ActiveDocument.RestoreSettings
     Optimization = False
End Sub

It's very basic. It did go faster. For faster yet, I actually want it
to just select all (SelectAll), but I am still getting oriented to
VBA for CDR. (I have been doing some lite programming in Java,
Javascript and VBA for Excel this last year).

I am still trying to get the CDR help turned on fully (between doing
actual work to meet todays deadlines). CDraw10 had alot more info
displayed. Before D11, I was just modifing some of my old scripts
with Ventura 8's script editor, but that was lost because our systems
were completely rebuilt (disk imaged) for 7 software progs we
upgraded a couple of weeks ago.

Alex and others thanks again. This stuff is all good. It's great to
find this NG.

~Jim

#1073 From: WheelerWerks <wwerks@...>
Date: Mon Nov 18, 2002 11:26 pm
Subject: RE: Killing Screen Redraw
gswheels
Offline Offline
Send Email Send Email
 
At or around on or about Monday 03:44 PM 11/18/02 -0500, Alex Vakulenko
could be heard whispering in the mist

>If you don't mind, send me your code (or part of it) and I'll see if it can
>be improved in any way. Or you can post it here and everybody could
>benefit from this review...

Here, here, please post it here.  I vote for the group review (if I didn't
make it clear before).

Regards,
Geoff.

#1072 From: Nick Wilkinson <nick@...>
Date: Mon Nov 18, 2002 8:48 pm
Subject: Re: Killing Screen Redraw
isocalc
Offline Offline
Send Email Send Email
 
Jim,

I find that minimizing the screen is one good way. Also, kill all
interactive toolbars (property bar) and dockers, since they all update
themselves each time and swtich to simple wireframe. And, if your script
is rock solid and never crashes, Application.Invisible=True achieves the
same as all the above, but if CorelDRAW dies halfway, it's Task Manager
or nothing.

HTH.

--
Nick Wilkinson.
www.isocalc.com - The site for technical illustrators.


jimjwiley wrote:
> Hi,
> I have CAD lineart that I have to change thousands of lines for each
> drawing I import into Draw11. I am using a simple script. Is there
> any way to eliminate the delay for the screen to redraw with each
> line being selected and changed?
> Thanks,
> Jim Wiley
>
>
> To unsubscribe from this group, send an email to:
> cdrvba-unsubscribe@yahoogroups.com
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>

Messages 1072 - 1101 of 1101   Newest  |  < Newer  |  Older >  |  Oldest
Advanced
Add to My Yahoo!      XML What's This?

Copyright © 2009 Yahoo! Inc. All rights reserved.
Privacy Policy - Terms of Service - Guidelines - Help