aboutsummaryrefslogtreecommitdiffstats
path: root/Word Count
diff options
context:
space:
mode:
Diffstat (limited to 'Word Count')
-rw-r--r--Word Count/AppDelegate.applescript15
1 files changed, 14 insertions, 1 deletions
diff --git a/Word Count/AppDelegate.applescript b/Word Count/AppDelegate.applescript
index e42da45..38a3c2e 100644
--- a/Word Count/AppDelegate.applescript
+++ b/Word Count/AppDelegate.applescript
@@ -11,9 +11,22 @@ script AppDelegate
-- IBOutlets
property theWindow : missing value
+ property theCharacters : missing value
+ property theWords : missing value
+ property theParagraphs : missing value
on applicationWillFinishLaunching_(aNotification)
- -- Insert code here to initialize your application before any files are opened
+ tell application "TextEdit"
+ set top_document to document 1
+
+ set l_chars to count characters of top_document
+ set l_words to count words of top_document
+ set l_paragraphs to count paragraphs of top_document
+ end tell
+
+ theCharacters's setStringValue_(l_chars)
+ theWords's setStringValue_(l_words)
+ theParagraphs's setStringValue_(l_paragraphs)
end applicationWillFinishLaunching_
on applicationShouldTerminate_(sender)