Sript zum Ein- und Ausblenden von Kurzbefehl-Listen

[space]

Script zum Ein- und Ausblenden von Kurzbefehl-Listen

Hallo!
Ich bin auf der Suche, mir möglichst komfortabel eine Liste der Kurzbefehle zu den jeweils geöffneten Programmen ein- und ausblenden zu lassen.

Also habe ich ein paar Skript-Versuche gestartet, welche ich dann im Programm Butler für die verschiedenen Programme mit einem einheitlichen Kurzbefehl starten könnte.

Am liebsten würde ich ja direkt die Kurzbefehle in der Hilfe des geöffneten Programmes einblenden... aber es funktioniert nicht. Kann es ja auch nicht...im Funktionsverzeichniss steht ja auch was von einem Befehl "search", den ich aber nicht eingebunden bekomme.

(Dazu sei gesagt, dass meine Applescript Kenntnisse gegen Null tendieren.)

So sieht das bisher aus (z.B für Mail.app):

tell application "Finder"
	set isRunning to (count (every process whose name is "Mail")) as boolean
end tell

if (isRunning) then
	tell application "Help Viewer" to activate
	tell application "Help Viewer" to (lookup anchor ("Kurzbefehle im Programm Mail") in book ("Mail Hilfe"))
end if

Also hab ich die Kurzbefehle mal in eine Textdatei reinkopiert:

tell application "Finder"
	set isRunning to (count (every process whose name is "Mail")) as boolean
end tell

if (isRunning) then
	tell application "Finder" to open the file "Samsung:Users:xyz:Desktop:Mail.app Shortcuts.txt"
	
end if

Das funktioniert immerhin soweit

Doch wie geht es weiter? Wie muss es weiter formuliert werden, dass die Datei, bzw. die Mail-Hilfe wieder geschlossen wird, wenn das Skript erneut läuft?



Oder mal andersrum:
Hat vielleicht jemand eine andere Idee, um zum Ziel zu kommen?


Gruss
space

 

[space]

Habe mal ein Script, welches Daisy für mich geschrieben hatte, umgemodelt:

set thePath to ("/Users/xyz/Desktop/abc.rtf")
set thePPath to POSIX file thePath

tell application "Finder"
	set isRunning to (count (every process whose name is "TextEdit")) as boolean
end tell

if (isRunning) then
	tell application "TextEdit" to quit
else
	tell application "TextEdit" to open thePPath
end if

Würde aber gerne in der "Help-Viewer" Angelegenheit weiterkommen.
Für manch einen ein Klacks, für mich leider nicht

Gruss

 

[astraub]

Hallo,

auf die Gefahr hin, Dich zu enttäuschen - aber so etwas gibt es schon .....

Gruss
Andreas

 

[space]

Warum enttäuschen?
So etwas hatte ich mir insgeheim vorgestellt!

Gruss

 

[astraub]

Dann

... freue ich mich geholfen zu haben

Gruss
Andreas