Sa 1. Jun 2019, 08:39
Sa 1. Jun 2019, 09:22
Sa 1. Jun 2019, 10:12
Sa 1. Jun 2019, 11:49
Sa 1. Jun 2019, 14:02
Sa 1. Jun 2019, 14:46
Sa 1. Jun 2019, 15:08
Sa 1. Jun 2019, 21:39
Mo 23. Nov 2020, 12:02
Di 24. Nov 2020, 20:59
#include <MsgBoxConstants.au3>
LR_Restore()
[img]https://pentaxians.eu/forumimages/2020/5330/5330_2020112412_screenshot.jpg[/img]
Func LR_Restore()
Local $hWnd
Local $hControl
;Zugriff auf das Lightroom-Fenster
Opt("WinTitleMatchMode", 2)
$hWnd = WinGetHandle("[CLASS:AgWinMainFrame; TITLE:Lightroom]", "")
;Zum Test MsgBox anzeigen
MsgBox($MB_SYSTEMMODAL, "", "The window is: " & $hWnd)
WinActivate ($hWnd)
;Lightroom Protokoll-Liste
;Zugriff auf das Steuerelement, d.h. die Protokoll-Liste im Entwickeln-Modul, ID mittels Window Info ermitteln
$hControl = ControlGetHandle($hWnd, "", "[ID:1003]")
If @error Then
MsgBox($MB_SYSTEMMODAL, "", "An error occurred: ControlGetHandle")
Exit
EndIf
;Zum Test MsgBox anzeigen
;Display the handle of the control. Compare with Window Info Tool
MsgBox($MB_SYSTEMMODAL, "", "The handle of Control is: " & $hControl)
;Retrieve the text of the control in Lightroom.
Local $sText = ControlGetText($hControl, "", "")
;Zum Test MsgBox anzeigen
;Display the text of the control.
MsgBox($MB_SYSTEMMODAL, "", "The text is: " & $sText)
For $i = 1 To 47 Step 1 ;Anzahl der Bilder, hier sind es noch 47
ControlClick ( $hControl, "", "", "", 1, 100, 30) ;Zeile im Lightroom Protokoll anklicken, Koordinaten mittels Window Info oder probieren ermitteln
Sleep(2500) ;2,5 Sekunden warten
Send ("{RIGHT}") ;weiter zum nächsten Bild
Sleep(2500) ;2,5 Sekunden warten
Next
EndFunc
Hosted by iphpbb3.com
Impressum | Datenschutz