woodpecker •--->

Anmeldedatum: 12.10.2010 Beiträge: 150 Wohnort: Roggentin/Rostock
|
Verfasst am: 24.11.2010 - 18:18 Titel: Ein Zoom im Editorfenster |
|
|
Hallo Skriptentwickler,
bei großen Bildschirmen mit hoher Auflösung sieht der Text im Editorfenster manchmal ziemlich mickrig aus und man braucht manchmal schon eine Lupe oder wenigstens eine gute Brille. In den Einstellungen kann zwar eine Schriftgröße vorgeben werden, aber das ist ziemlich umständlich, weil man die Einstellung für jedes syntaktische Element einzeln vornehmen muss.
Deshalb habe ich mir ein Skript geschrieben, was ich in das Skriptverzeichnis des Editors gehängt habe und was den Fensterinhalt temporär zoomt. Beim Klick auf Übersetzen oder Ausführen ist alles wieder im Originalzustand. Das was das Skript macht, kann man natürlich auch per Hand machen, aber es sind immerhin ein paar Affengriffe nötig.
Los geht's:
Code: | # Script : EditZoom (AppleScript) Stand vom : Mittwoch, 24. November 2010 16:49:59 Uhr
# Autor : Erich Schmidt
tell application "Script Editor"
activate window index 1
my zoom()
end tell
on zoom()
tell application "System Events"
key code 126 using command down # arrow up
key code 119 using shift down # page down
keystroke "+++++" using command down
key code 124 # arrow right
end tell
end zoom |
Der Zoom-Faktor wird im keystroke eingestellt und kann natürlich individuell angepasst werden. Wem's im Originalzustand zu gross ist, der kann natürlich auch Minuszeichen eintragen.
Viel Erfolg! |
|