OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Corel User Forums > CorelDRAW > Macros/Add-ons

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 26-07-2005, 10:09
xombie
Guest
 
Posts: n/a
Question Draw into Paint doesnt work in v11

Hello all.
I posted in the photopaint forum but its pretty quiet in there: I think this is valid here too:.....
I have written a script within corelDraw12 object model that prompts the user to save a selection thats in an unnamed file to a network directory via SaveAs"". this works. Then The macro prompts the user to choose whether or not they want to export the file to a jpeg (200dpi x 200dpi) and then to a smaller jpeg for emailing purposes. This works too. Then The macro offers the user a choice to print the larger jpeg file out of Photopaint.(for reasons too long to explain here).It launches photopaint, opens the specified file Then opens the network printer settings dialogue. This works Also but only in v12.
When I put this macro on a machine that uses the version 11 suite. It stops
at this section of this part of the script....
<code>
Set doc1 = PHOTOPAINT.Application.OpenDocument(nfn)'nfn is defined earlier as new file name variable(string)
<code/>
..........and presents me with an error to the effect of "this application has committed an illegal function blah blah blah"
I have made sure to referance the PHOTOPAINT11 type library
but still it doesnt work.
here is the questionable line in context:-
<code>
Dim CPP As PHOTOPAINT.Application
Set CPP = PHOTOPAINT.Application
With CPP
.Application.AppWindow.Activate
Dim doc1 As Variant
Set doc1 = PHOTOPAINT.Application.OpenDocument(nfn)
PHOTOPAINT.ActiveDocument.Activate
With PHOTOPAINT.ActiveDocument.PrintSettings
.SelectPrinter "\\some_named_server\ColorPASS Z5000"
.ShowDialog
end with
<code/>
any ideas why???
Thanx
Andy.
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
Attributes in Corel Draw dueless CorelDRAW/Corel DESIGNER VBA 8 09-01-2008 07:56
Vector data from Paint to Draw 12? jimmr General 4 26-05-2005 07:24
Transfer shapes from Draw to Paint; Using CorelScript in VB6 DWGraphics Corel Photo-Paint VBA 1 18-08-2004 21:49
VBA does not work with my CD 10 ! jobar CorelDRAW/Corel DESIGNER VBA 1 24-08-2003 13:38
Draw hogs access to ExportBitmap created files pbarton CorelDRAW/Corel DESIGNER VBA 1 10-07-2003 16:28


All times are GMT -5. The time now is 17:11.


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