SBScript
auch Einträge finden, die Sie in den Grundfunktionen finden.) |
Mit Hilfe von SongBeamer Script kann man SongBeamer mit eigenen Scripts erweitern.
Strings werden in einfachen Anführungszeichen geschrieben. Also z.B. 'Hello World'. Mit einem "+" Zeichen kann man Strings aneinanderhängen. Ein Befehl muß immer mit einem ; abgeschlossen werden.
Beispiele
Taschenrechner starten:
CreateProcess(getfolder_system+'calc.exe');
Aktuelle Präsentation je nach Typ mit PowerPoint oder Paint bearbeiten:
var Ext: String; begin Ext := AnsiLowerCase(ExtractFileExt(CurrentFileName)); if Ext = '.bmp' then CreateProcess(GetFolder_System+'mspaint.exe', CurrentFileName) else if Ext = '.ppt' then CreateProcess(GetFolder_ProgramFiles+'Microsoft Office\OFFICE11\POWERPNT.EXE', CurrentFileName) else MessageDlg('Zur Zeit ist kein Bild und keine PPT-Datei geöffnet', mtError, [mbOk], -1); end.
Verfügbare Funktionen
function CreateProcess(const FileName: String; Params: String = ''; Wait: Boolean = False): Boolean;
Startet ein externes Programm.
- FileName: Dateiname des Programms
- Params: Parameter für das zu startende Programm
- Wait: "True" um zu warten, bis das Programm beendet ist
Rückgabewert: True wenn erfolgreich, sonst False Beispiel: CreateProcess(getfolder_system+'calc.exe');
function GetFolder_System: String;
Ermittelt das Windows-Systemverzeichnis (meist C:\Windows\System32\)
function GetFolder_Application: String;
Verzeichnis in dem SongBeamer gestartet wurde.
function CurrentFileName: String;
Rückgabewert: Dateiname der gerade geöffneten Präsentation
function ExtractFileExt(const FileName: string): string;
Rückgabewert: Dateierweiterung von FileName
function AnsiLowerCase(const S: string): string;
Wandelt einen String in Kleinbuchstaben um.
procedure ShowMessage(const Msg: string);
Zeigt einen Message-Dialog mit dem Text "Msg" an. Beispiel: ShowMessage('Hello World');