AppleScript-Programme sind selbstständige Mac-Applikationen, die im
Apple ScriptEditor oder im Script Debugger bearbeitet und debuggt
werden können. Um Sie von RealBasic aus aufzurufen, muß man das
AppleScript-Programm als kompiliertes MacOS X Programm abspeichern.
Anschließend zieht man das Programm in das RealBasic-Projektfenster und
kann es von RealBasic wie eine gewöhnliche Methode aufrufen.
Zu beachten ist: Das AppleScript-Code sollte innerhalb eines "on run
... end run"- Events stehen und auch über return xxx einen Wert
zurückgeben.
Im RealBasic ruft man das AppleScript dann so auf:
*****
dim erg as string
erg = MeinAppleScript(text1, text2) // AppleScript-Aufruf
Mit freundlichen Grüßen,
Christian Abele
Entwicklung
Datenbanken & Elektronische Medien
-------------------------------------------------------
Reichert GmbH, Druck + Kommunikation
Rechbergstrasse 10
70806 Kornwestheim
Tel. 07154 - 13 12 16
Fax. 07154 - 13 12 77
e-mail c_abele at reichert-druck dot de
Am 23.12.2004 um 09:41 schrieb Rudi Maier:
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
|