Neue Testversion 21.40b6

[Martin Huber]

Error message box is sometime too small to read the entire message

I will check that.

Martin

[PhilM]

Martin Huber wrote :
doc.Paste doesn't take any parameters. It will always insert after the active layer.

doc.Paste should have at least an option to paste a virtual copy.
Or there should be an other method like "doc.PasteVirtual" without option ?

Philippe

[Martin Huber]

Martin Huber wrote :
doc.Paste doesn't take any parameters. It will always insert after the active layer.

doc.Paste should have at least an option to paste a virtual copy.
Or there should be an other method like "doc.PasteVirtual" without option ?

You can do that with PhotoLine.Page's DuplicateVirtual().

Martin

[PhilM]

Martin Huber wrote :
doc.Paste doesn't take any parameters. It will always insert after the active layer.

doc.Paste should have at least an option to paste a virtual copy.
Or there should be an other method like "doc.PasteVirtual" without option ?

You can do that with PhotoLine.Page's DuplicateVirtual().

Martin

In the VBScript manual (odt) delivered with 21.40b6, Page does not have a DuplicateVirtual() method.
Layer has a DuplicateVirtual
Did you mean Layer ?

Could you put an up-to-date pdf of the script manual somewhere on the forum ?

Regards

Philippe

[Martin Huber]

In the VBScript manual (odt) delivered with 21.40b6, Page does not have a DuplicateVirtual() method.
Layer has a DuplicateVirtual
Did you mean Layer ?

Yes, of course, I did mean that.

Could you put an up-to-date pdf of the script manual somewhere on the forum ?

If it contains the Paste documentation, then it is up to date.
The latest beta should always contain the latest documentation.

Martin

[PhilM]

Could you put an up-to-date pdf of the script manual somewhere on the forum ?

If it contains the Paste documentation, then it is up to date.
The latest beta should always contain the latest documentation.

Martin

Yes, it does contain a fresh version of the Open Office manual.
But the hyperlinks inside the document do not work when opened with MS Office.
It would be nice to include the relative pdf version also.

Thanks

Philippe

[PhilM]

Group

I tried to create a new empty group with :
Set grp = CreateObject("PhotoLine.Group")

It generates an error

Is there a way to do it ?
And later on, to populate the group with new layers.

Philippe

[russellcottrell]

I found this out by trial and error; the default layer seems to be a group:

Code: Alles auswählen

var pl = new ActiveXObject("PhotoLine.Application");
var doc = pl.ActiveDocument;
var gLayer = new ActiveXObject("PhotoLine.Layer");
doc.RootLayer.Insert(gLayer, -1);

[PhilM]

I found this out by trial and error; the default layer seems to be a group:

Code: Alles auswählen

var pl = new ActiveXObject("PhotoLine.Application");
var doc = pl.ActiveDocument;
var gLayer = new ActiveXObject("PhotoLine.Layer");
doc.RootLayer.Insert(gLayer, -1);

Yes, it does work
In VBScript :

Code: Alles auswählen

...
Set grp = CreateObject("PhotoLine.Layer")
doc.RootLayer.Insert grp, -1

[PhilM]

Help needed !

I am working on a multi-page document.

I can't find how to move from page to page : Next/Previous, First/Last or to move to a specific page number.

The only piece of script I found is :
Dim page
Set page = doc.ActivePage

But that does not bring me very far ...

Thanks

Philippe

[russellcottrell]

On a related note, in browsers you can list all the properties of an object like this:

Code: Alles auswählen

var objShell = new ActiveXObject("WScript.Shell");
for (var propertyName in doc)
  objShell.Popup(propertyName);

But it doesn’t do anything in PhotoLine.

[PhilM]

On a related note, in browsers you can list all the properties of an object like this:

Code: Alles auswählen

var objShell = new ActiveXObject("WScript.Shell");
for (var propertyName in doc)
  objShell.Popup(propertyName);

But it doesn’t do anything in PhotoLine.

Not familiar with js
I converted it in VBScript
And got a Type error with the objShell.Popup
Can you solve it ?

Code: Alles auswählen

Dim pl, doc
Set pl = CreateObject("PhotoLine.Application")
Set doc = pl.ActiveDocument
pl.Visible = True

Dim objShell
Set objShell = CreateObject("WScript.Shell")
Dim propertyName
for Each propertyName in doc
	objShell.Popup propertyName
Next

[russellcottrell]

WScript.Shell is for javascript. In vbscript, just do

Code: Alles auswählen

for Each propertyName in doc
	MsgBox propertyName

[PhilM]

WScript.Shell is for javascript. In vbscript, just do

Code: Alles auswählen

for Each propertyName in doc
	MsgBox propertyName

Same
It looks like propertyName is not text

[Martin Huber]

I am working on a multi-page document.

I can't find how to move from page to page : Next/Previous, First/Last or to move to a specific page number.

You can do

Code: Alles auswählen

For Each page In doc
    (...)
Next

Martin