realbasic-nug.de
[Top] [All Lists]

Apple Script

To: REALbasic-NUG German <realbasic-nug dot de at lists dot realsoftware dot com>
Subject: Apple Script
From: rudi dot maier at t-online dot de (Rudi Maier)
Date: Thu, 23 Dec 2004 09:41:09 +0100
Delivered-to: realbasic-nug dot de at lists dot realsoftware dot com
Hallo Liste,

ich möchte via iListen ein RB-Programm mit Sprache steuern.
Bei iListen kann mit einem Sprachbefehl ein Apple Script gestartet werden.
Apple Script ist für mich Neuland. Ich habe nun ein Beispiel gefunden. Da
wird ein String an ein RB-Programm übergeben.

tell application "My RB App"
    activate
    set x to "hallo"
    AddText x
end tell

Im RB-Programm wird der String in eine Listbox eingetragen:

Function HandleAppleEvent(event as AppleEvent, eventClass as string, eventID
as string) as boolean

  dim txt as string
  
  if eventID="DISP" then
    
    txt=event.StringParam("----")
    Window1.ListBox1.AddRow txt
    return true//required if an AppleEvent worked
    
  end if
  
End Function

In RB 4.5.3 funktioniert alles gut aber nicht mehr in RB 5.5

Wer kann hefen?
Danke!

Rudi Maier


<Prev in Thread] Current Thread [Next in Thread>