Neue Testversion 20.90b10

Hier diskutieren die Betatester von PhotoLine untereinander und mit den Entwicklern
User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Fri 18 May 2018 09:45

Got the basics working - I remembered the scripting documentation. :-)
After discovering "SelectedLayers" it was smooth sailing from there. Very simple.

Dim pl
Dim doc
Dim layer
Dim layers

Set pl = CreateObject("PhotoLine.Application")
Set doc = pl.ActiveDocument

pl.Visible = True
If Not doc Is Nothing Then
Set layers = doc.SelectedLayers

If (Not layers Is Nothing) Then
For Each layer In layers
layer.DoOperation "Scale", "Mode", 5, "ValueX", 300, "ValueY", 300, "Interpolation", 6,"ShowDialog",true
Next
End If
End If
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

Martin Huber
Entwickler
Entwickler
Posts: 3204
Joined: Tue 19 Nov 2002 15:49

Re: Neue Testversion 20.90b10

Post by Martin Huber » Fri 18 May 2018 09:59

Herbert123 wrote:
Fri 18 May 2018 09:45
Got the basics working - I remembered the scripting documentation. :-)
I was too slow. The corresponding AppleScript looks like this:

Code: Select all

tell application "PhotoLine"
	try
		set doc to front document
	on error
		set doc to missing value
	end try
	if doc is not missing value then
		set selLayers to selected layers of doc
		repeat with actLayer in selLayers
			-- if type of layer is LTImage then
			-- 5 is the fitting scale mode, 6 is Catmull Rom interpolation
			actLayer do operation type "Scale" with options {|Mode|:5, |ValueX|:300, |ValueY|:300, |Interpolation|:6}
			--  end if
		end repeat
	end if
end tell
Martin

User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Fri 18 May 2018 10:09

How do you call an input dialog? Can't seem to find it. ShowDialog displays a dialog (obviously) for each layer in the array.
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Fri 18 May 2018 10:28

No matter, I got it. I've never used VBA before, so I figured I'd read up on basic VBA dialogs.

This is what I got so far. Error checking I'll add tomorrow morning (it is late!). But this is fun, and it solves my problem with scaling multiple selected layers in one step! Scripting is super useful, and I am very thankful for the addition.

Option Explicit

Dim pl
Dim doc
Dim layer
Dim layers
Dim fsize
Dim scaleNum

Set pl = CreateObject("PhotoLine.Application")
Set doc = pl.ActiveDocument

pl.Visible = True

If Not doc Is Nothing Then
Set layers = doc.SelectedLayers
fsize=InputBox("Enter the width or height:","Scale Selected Layers","Enter number here")
scaleNum = CInt(fsize)

If (Not layers Is Nothing) Then
For Each layer In layers
layer.DoOperation "Scale", "Mode", 5, "ValueX", scaleNum, "ValueY", scaleNum, "Interpolation", 6
Next
Else
MsgBox("No Layers Selected!")
End If
End If
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Fri 18 May 2018 11:17

Actually, I could not sleep until I finished the script. Added some error checking, and handling of the cancel button. Still need to handle the input (check if it is numeric) and Ideally I'd like to create a more complex form in which the user can choose the interpolation mode and some other related options. Later :D
Again, I have to get used to VBA - never used it before. Google was my best friend tonight! But it proved to be pretty simple so far.

I attached the script for those who are interested (it proportionally scales all selected layers to a defined width or height).
You do not have the required permissions to view the files attached to this post.
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

Martin Huber
Entwickler
Entwickler
Posts: 3204
Joined: Tue 19 Nov 2002 15:49

Re: Neue Testversion 20.90b10

Post by Martin Huber » Fri 18 May 2018 14:15

Herbert123 wrote:
Fri 18 May 2018 11:17
Actually, I could not sleep until I finished the script. Added some error checking, and handling of the cancel button. Still need to handle the input (check if it is numeric) and Ideally I'd like to create a more complex form in which the user can choose the interpolation mode and some other related options. Later :D
Again, I have to get used to VBA - never used it before. Google was my best friend tonight! But it proved to be pretty simple so far.
Yes, VBS is sometimes a bit strange, but overall quite simple.

I am planning to add a ShowOperationDialog command showing the dialog of an operation, but not executing it. Instead it will return the dialog settings which can be used for a DoOperation later on. So something like

Code: Select all

Dim dialogSettings

Set dialogSettings = layer.ShowOperationDialog("Scale")
layer.doOperation "Scale", dialogSettings
should work in the next beta.

One warning: I just discovered, that PhotoLine won't terminate correctly, if you are using "for each" with an IPLLayerArray. It will continue to run in the background after quit. I will fix that.

Martin

User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Sun 20 May 2018 02:55

For some reason the mini browser scrolling and scroll bar are deactivated when I show the recent files list. Scrolling with the scrollwheel doesn't work either. When I zoom in more, it works again. And yes, there's overflowing content that is hidden, so the scrolling should be working.

When I open one of my favourite image folders, it works.
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Sun 20 May 2018 08:30

Bug custom rotation point reset

When a layer is rotated around a custom rotation point, and the rotation is reset, PhotoLine will use the top left corner instead of the custom rotation point to reset the rotation, causing the layer to move from its original position.

Ideally PhotoLine would use the same custom rotation point to reset the layer's rotation, and not changing the position.

I mentioned this issue a while ago, but I think I wasn't clear enough.
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Sun 20 May 2018 19:08

Herbert123 wrote:
Sun 20 May 2018 02:55
For some reason the mini browser scrolling and scroll bar are deactivated when I show the recent files list. Scrolling with the scrollwheel doesn't work either. When I zoom in more, it works again. And yes, there's overflowing content that is hidden, so the scrolling should be working.

When I open one of my favourite image folders, it works.
Weirdly enough it works again. Must have been a glitch.
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Mon 21 May 2018 08:53

Bug layer effect Shadow Inside

Shadow inside with a soft border causes a rendering error (shadow is cut off).
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

Martin Huber
Entwickler
Entwickler
Posts: 3204
Joined: Tue 19 Nov 2002 15:49

Re: Neue Testversion 20.90b10

Post by Martin Huber » Tue 22 May 2018 17:34

Herbert123 wrote:
Mon 21 May 2018 08:53
Bug layer effect Shadow Inside

Shadow inside with a soft border causes a rendering error (shadow is cut off).
Do you have a small sample document?

Martin

User avatar
Herbert123
Mitglied
Posts: 1680
Joined: Sat 12 May 2012 21:38

Re: Neue Testversion 20.90b10

Post by Herbert123 » Tue 22 May 2018 21:02

Martin Huber wrote:
Tue 22 May 2018 17:34
Herbert123 wrote:
Mon 21 May 2018 08:53
Bug layer effect Shadow Inside

Shadow inside with a soft border causes a rendering error (shadow is cut off).
Do you have a small sample document?

Martin
Yes, here is a simple example attached.
You do not have the required permissions to view the files attached to this post.
/*---------------------------------------------*/
System: Win10 64bit - i7 920@3.6Ghz, p6t Deluxe v1, 48gb (6x8gb RipjawsX), Nvidia GTX1080 8GB, Revodrive X2 240gb, e-mu 1820, 2XSamsung SA850 (2560*1440) and 1XHP2408H 1920*1200 portrait

Martin Huber
Entwickler
Entwickler
Posts: 3204
Joined: Tue 19 Nov 2002 15:49

Re: Neue Testversion 20.90b10

Post by Martin Huber » Wed 23 May 2018 15:24

Herbert123 wrote:
Tue 22 May 2018 21:02
Bug layer effect Shadow Inside

Shadow inside with a soft border causes a rendering error (shadow is cut off).
I will fix that.

Martin

User avatar
Martin Stricker
Mitglied
Posts: 834
Joined: Tue 14 Oct 2003 08:19
Location: BW

Re: Neue Testversion 20.90b10

Post by Martin Stricker » Mon 28 May 2018 20:40

Ich habe ein Wacom Intuos und habe eine der Seitentasten mit doppelklick belegt um bei Verwendung des Vektorlassos einfacher einen Punkt einzufügen. Das funktioniert unter High Sierra leider nicht richtig. Der Doppelklick mit dem Vektorlasso muss so genau gesetzt werden, dass es eher Zufall ist wenn es mal klappt. Unter Windows 7 hab ich mit meinem größeren Wacom kein Problem. Vielleicht könnt ihr da mal reinschauen, danke.

User avatar
asharpe
Mitglied
Posts: 90
Joined: Mon 23 Dec 2013 07:01
Location: Palo Alto, California, USA

Rotating in Show Image doesn't.

Post by asharpe » Mon 28 May 2018 20:53

Looking at an iPhone jpg in Browse, the thumbnail image is rotated automatically correctly (in my case, to portrait). When I use Show Image within Browse, the image is not rotated correctly (it is still landscape). And when I click on the Rotate Right button at the bottom of Show Image, the image I am viewing doesn't rotate, but the thumbnail in the Browse index does! However, after that closing and reopening the image with Show image, the rotation then matches the thumbnail.

If it helps, here's the exif:

$ exiftool-5.26 ~/Desktop/2018-05-27/IMG_1044.jpg
ExifTool Version Number : 10.73
File Name : IMG_1044.jpg
Directory : /Users/asharpe/Desktop/2018-05-27
File Size : 3.3 MB
File Modification Date/Time : 2017:12:28 12:07:18-08:00
File Access Date/Time : 2018:05:28 11:57:15-07:00
File Inode Change Date/Time : 2018:05:28 10:37:07-07:00
File Permissions : rwxr-xr-x
File Type : JPEG
File Type Extension : jpg
MIME Type : image/jpeg
Exif Byte Order : Big-endian (Motorola, MM)
Make : Apple
Camera Model Name : iPhone 5s
Orientation : Rotate 90 CW
X Resolution : 72
Y Resolution : 72
Resolution Unit : inches
Software : 11.1
Modify Date : 2017:12:28 12:07:18
Y Cb Cr Positioning : Centered
Exposure Time : 1/120
F Number : 2.2
Exposure Program : Program AE
ISO : 50
Exif Version : 0221
Date/Time Original : 2017:12:28 12:07:18
Create Date : 2017:12:28 12:07:18
Components Configuration : Y, Cb, Cr, -
Shutter Speed Value : 1/120
Aperture Value : 2.2
Brightness Value : 5.22029148
Exposure Compensation : 0
Metering Mode : Spot
Flash : Off, Did not fire
Focal Length : 4.2 mm
Subject Area : 1682 996 610 612
Run Time Flags : Valid
Run Time Value : 1179109701290750
Run Time Scale : 1000000000
Run Time Epoch : 0
Acceleration Vector : 0.07046475259 -0.8186275365 -0.5698596705
HDR Image Type : HDR Image
Image Unique ID : 94E39CAE-9D77-4527-A49B-AE0F3069F654
Sub Sec Time Original : 858
Sub Sec Time Digitized : 858
Flashpix Version : 0100
Color Space : sRGB
Exif Image Width : 3264
Exif Image Height : 2448
Sensing Method : One-chip color area
Scene Type : Directly photographed
Custom Rendered : HDR
Exposure Mode : Auto
White Balance : Auto
Focal Length In 35mm Format : 29 mm
Scene Capture Type : Standard
Lens Info : 4.15mm f/2.2
Lens Make : Apple
Lens Model : iPhone 5s back camera 4.15mm f/2.2
Compression : JPEG (old-style)
Thumbnail Offset : 1802
Thumbnail Length : 11582
Image Width : 3264
Image Height : 2448
Encoding Process : Baseline DCT, Huffman coding
Bits Per Sample : 8
Color Components : 3
Y Cb Cr Sub Sampling : YCbCr4:2:0 (2 2)
Aperture : 2.2
Image Size : 3264x2448
Megapixels : 8.0
Run Time Since Power Up : 13 days 15:31:49
Scale Factor To 35 mm Equivalent: 7.0
Shutter Speed : 1/120
Create Date : 2017:12:28 12:07:18.858
Date/Time Original : 2017:12:28 12:07:18.858
Thumbnail Image : (Binary data 11582 bytes, use -b option to extract)
Circle Of Confusion : 0.004 mm
Field Of View : 63.7 deg
Focal Length : 4.2 mm (35 mm equivalent: 29.0 mm)
Hyperfocal Distance : 1.82 m
Light Value : 10.2