Fischer-Bayern.de
 FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen   RegistrierenRegistrieren 
 ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin 

Focus zurück auf Dialog

 
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> AppleScript X
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Yogie
•->
•->


Anmeldedatum: 21.04.2015
Beiträge: 1

BeitragVerfasst am: 21.04.2015 - 07:54    Titel: Focus zurück auf Dialog Antworten mit Zitat

Hallo,

ich habe eine kleine App geschrieben, die mir Keynotes startet, nachdem eine Keynote beendet wird möchte ich gerne erreichen, dass der Dialog wieder in den Vordergrund geholt wird, leider funktioniert das nicht so wie ich es versucht habe, hat jemand eine Idee?

Code:
set PresentationMode to "On"

if running of application "Keynote" is false then
   tell application "Keynote" to launch
   tell application "Finder"
      set visible of process "Keynote" to false
   end tell
end if

repeat while PresentationMode = "On"
   
   display dialog "Was möchten Sie?" buttons {"Präsentation wählen", "Quit"} with icon note with title "Keynote-Starter"
   
   if result = {button returned:"Quit"} then
      set PresentationMode to "Off"
      exit repeat
   else if result = {button returned:"Präsentation wählen"} then
      
      tell application "Keynote"
         activate
         try
            set the myFile to ¬
               (choose file of type ¬
                  {"com.apple.iwork.keynote.key", ¬
                     "com.apple.iwork.keynote.kth", ¬
                     "com.apple.iwork.keynote.sffkey", ¬
                     "com.apple.iwork.keynote.key-tef", ¬
                     "com.microsoft.powerpoint.ppt", ¬
                     "org.openxmlformats.presentationml.presentation", ¬
                     "org.openxmlformats.presentationml.presentation.macroenabled", ¬
                     "com.microsoft.powerpoint.pps", ¬
                     "org.openxmlformats.presentationml.slideshow", ¬
                     "org.openxmlformats.presentationml.slideshow.macroenabled", ¬
                     "com.microsoft.powerpoint.pot", ¬
                     "org.openxmlformats.presentationml.template", ¬
                     "org.openxmlformats.presentationml.template.macroenabled"} ¬
                     default location (path to documents folder) ¬
                  with prompt "Wählen sie ihre Präsentation:")
            open the myFile
         on error errorMessage number errorNumber
            if errorNumber is not -128 then
               display alert errorNumber message errorMessage
            end if
         end try
      end tell
      
      
   end if
   
   tell application "Keynote"
      activate
      open myFile
      start the front document from the first slide of the front document
      repeat while playing
      end repeat
      close document 1 without saving
   end tell
   
   

   tell application "Keynote-Starter"
      set window 1 of application "Keynote-Starter" to frontmost
   end tell
   

   
   
end repeat


tell application "Keynote"
   quit
end tell


Also gezielt geht es um den Bereich:

Code:
   tell application "Keynote-Starter"
      set window 1 of application "Keynote-Starter" to frontmost
   end tell


Vielen Dank für Tipps im Voraus!
_________________
Gehab Dich Wohl!
Yogie
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
iScript
•---->
•---->


Anmeldedatum: 29.03.2001
Beiträge: 1116

BeitragVerfasst am: 01.07.2015 - 23:44    Titel: Antworten mit Zitat

also wenn "Keynote-Starter" das Programm ist, dass Du hier gepostet hast, dann versuchs mal mit 'nem schlichten

activate me
_________________
- anholn deit kriegen -
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen AIM-Name
Heantbgin
•->
•->


Anmeldedatum: 14.10.2015
Beiträge: 2

BeitragVerfasst am: 14.10.2015 - 14:08    Titel: Antworten mit Zitat

Here was something for a long time wanted to have it here.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Fischer-Bayern.de Foren-Übersicht -> AppleScript X Alle Zeiten sind GMT + 2 Stunden
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.


Powered by phpBB © 2001, 2002 phpBB Group
Deutsche Übersetzung von phpBB.de


AppleScript für absolute Starter