Unit GlobalFunctions

Uses
Classes, Interfaces, Objects and Records
Types
Constants
Variables

Description

 

Overview

Functions and Procedures

procedure CloneDatabase(iConnection: IDBAccess; iTargetType: TDBSQLServerType; iHost, iPort, iDatabase, iUser, iPassword, iExtraOptions: string; iIncludeIcons: boolean; iIncludePlaylist: boolean; iPlaylistLimit: TDateTime; iIncludeHistory: boolean; iHistoryLimit: TDateTime; iChangeDatabaseID: string; iProgressIndicator: IProgressIndicator);
function SecondsToTimeValue(iSeconds: double): TTimeValue;
function TimeValueToSeconds(iValue: TTimeValue): double;
function Exp(const X: Extended): Extended;
function Ln(const X: Extended): Extended;
function FileExists(const FileName: string): Boolean;
function ExtractFileName(const FileName: string): string;
function ExtractFileExt(const FileName: string): string;
function ChangeFileExt(const FileName, Extension: string): string;
function DeleteFile(const FileName: string): Boolean;
function GetTickCount64: int64;
function URLEncodeAnsi(const iString: string): string;
function URLEncodeUTF8(const iString: string): string;
function URLEncode(const iString: string): string;
function ISOWeek(DateTime: TDateTime): integer;
function FormatTimeValue(const iFormat: string; iTruncate: boolean; iValue: TTimeValue): string;
function DBToLinear(iValue: single): single;
function LinearToDB(iValue: single): single;
function ScaleToDB(iScale: single; iOverhead: single): single;
function DBToScale(iDB: single; iOverhead: single): single;
function FindFiles(const iPattern: string; iRecursive: boolean): IStrings;
function TimeValueToDateTime(iValue: TTimeValue): TDateTime;
function DateTimeToTimeValue(iDateTime: TDateTime): TTimeValue;
function DateTimeToISO8601(iValue: TDateTime; iEmptyIfZero: boolean; iWithMilliseconds: boolean): string;
function TryISO8601ToDateTime(const iValue: string; var oValue: TDateTime): boolean;
function ISO8601ToDateTime(const iValue: string; iDefault: TDateTime): TDateTime;
function GetAllocatedMemory: string;
function GetLargestFreeBlock: string;
function midiOutGetNumDevs: cardinal;
function AirenceRemote(iIndex: integer): IAirenceRemote;
function AirliteRemote(iIndex: integer): IAirliteRemote;
function AxiaRemote(iIndex: integer): IAxiaRemote;
function K8055Remote(iIndex: integer): IK8055Remote;
function IOWarriorRemote(iIndex: integer): IIOWarriorRemote;
function IOPort(iPort: word): IIOPort;
procedure UpdateAdvertising(iItems: IPlaylist);
procedure UpdateAdvertisingEx(iItems: IPlaylist; var oInspected, oChanged: integer; var oErrors: IStrings);
function DB(iIndex: integer): IDBConnection;
function DBAccess(iIndex: integer): IDBAccess;
function DHDRemote(iIndex: integer): IDHDRemote;
function RM2200DRemote(iIndex: integer): IRM2200DRemote;
function DMAXRemote(iIndex: integer): IDMAXRemote;
function EmberPlusConsumerRemote(iIndex: integer): IBaseEmberPlusConsumerRemote;
function Encoder: IBassStreamingEncoder;
function VXLWCPRemote(iIndex: integer): IVXLWCPRemote;
function MambaNetRemote(iIndex: integer): IMambaNetRemote;
function DefaultMixdownOptions: TMixdownOptions procedure MixdownPlaylist(iItems: IPlaylist; iOutputFilename: string; iFileFormat: TEncoderFileFormat; iBitrate: integer; iStereoMode: TEncoderStereoMode) procedure MixdownPlaylistEx(iItems: IPlaylist; iOutputFilename: string; iFileFormat: TEncoderFileFormat; iBitrate: integer; iStereoMode: TEncoderStereoMode; iSampleRate: integer; iEncoderOptions: string; iIncludedRegions: TSetOfByte) procedure MixdownPlaylistWithOptions(iItems: IPlaylist; iOutputFilename: string; iOptions: TMixdownOptions);
function GetNexusBackendSettings: INexusBackendSettingsList;
function CreateNexusBackend(const iSettings: INexusBackendSettings): INexusBackend;
function RESTRemote(iIndex: integer): IRESTRemote;
procedure RESTExecuteCommand(iURL, iCommand: string);
procedure _RESTError(iCode: integer; iErrorMessage, iContent: string);
function CreateRESTClientWithCredentials(iURL, iUser, iPassword: string): IRESTClient;
function CreateRESTClientWithToken(iURL, iToken: string): IRESTClient;
function SASRemote(iIndex: integer): ISASRemote;
procedure SystemLog(iMessage: string);
procedure RunScript(iFilename: string);
procedure ExecuteCommand(iCommand: string);
procedure ShellExecute(iProgram, iParameters: string);
procedure ShellExecuteHidden(iProgram, iParameters: string);
function Random(iRange: integer): integer;
procedure SetApplicationTitle(iValue: string);
function PlayoutEngine: IPlayoutEngine;
function PlaylistCount: integer;
function SelectPlaylist(iIndex: integer): boolean;
function Playlist(iIndex: integer): IPlaybackControl;
function CurrentPlaylist: IPlaylist;
function CurrentPlaylist: IPlaybackControl;
function PlaybackControl(iIndex: integer): IPlaybackControl;
function CurrentPlaybackControl: IPlaybackControl;
function Cartwall: ICartwallControl;
function DatabaseCount: integer;
function SelectDatabase(iIndex: integer): boolean;
function Database(iIndex: integer): IDatabase;
function CurrentDatabase: IDatabase;
function ComPort(iPort: string): IComPort;
function GetRemote(iType: TGUID; iIndex: integer): IRemote;
function Factory: IFactory;
function Config: IConfiguration;
function FakeNow: TDateTime;
function Instance: IInstanceData;
function AlbumArtService: IAlbumArtService;
procedure Sleep(milliseconds: Cardinal);
function IntToHex(Value: int64; Digits: integer): string;
function GetRuntimeData(iKey: string): string;
procedure SetRuntimeData(iKey: string; iValue: string);
function FileAge(const FileName: string; out FileDateTime: TDateTime): Boolean;
function MoveFile(const OldName, NewName: string): boolean;
function CopyFile(const iSource, iDestination: string; iOverwrite: boolean): boolean;
function FindAudioFiles(iPattern: string; iRecursive: boolean): IStrings;
procedure ShowMessage(const iMessage: string);
function Frac(Val: Extended): Extended;
function preg_match(iPattern, iString: string; out oMatches: IStrings): boolean;
function StringReplace(iText, iSearch, iReplace: string): string;
function FileSize(iFilename: string): int64;
procedure SendMail(iTo, iSubject, iBody: string);
function WrapText(const Line: string; MaxCol: Integer): string;
function MixerCount: integer;
function Mixer(iIndex: integer): IMixer;
function GetNextItems(iItem: IPlaylistItem; iIncludeItemTypes: TPlaylistItemTypes): IPlaylist;
procedure TraversePlaylist(iItems: IPlaylist; iRecursively: boolean; iCallback: TTraversePlaylistCallback);
function ResolveDBServerURL(iURL: string; iPurpose: TAudioPurpose; out oURL: string): boolean;
function HTTPGet(iURL: string): string;
function HTTPGetEx(iURL: string; iCustomHeaders: IStrings): string;
procedure HTTPGetAsync(iURL: string);
function HTTPGetFile(iURL, iTargetFilename: string): string;
function HTTPPost(iURL: string; iData: string): string;
procedure HTTPPostAsync(iURL: string; iData: string);
function HTTPPostRaw(iURL: string; iContentType: string; iData: RawByteString): string;
procedure HTTPPostRawAsync(iURL: string; iContentType: string; iData: RawByteString) function HTTPPutRaw(iURL: string; iContentType: string; iData: AnsiString; iCustomHeaders: IStrings): string;
procedure FTPGet(iHost: string; iPort: integer; iUser, iPassword, iFilename, iLocalFile: string) procedure EnableTimerEx(iID: string; iInterval: integer);
procedure EnableTimer(iInterval: integer);
procedure DisableTimerEx(iID: string);
procedure DisableTimer;
function StreamMonitor: IStreamMonitorModule;
function TCPClientRemote(iIndex: integer): ITCPClientRemote;
function TCPServerRemote(iIndex: integer): ITCPServerRemote;
function JSONServerRemote(iIndex: integer): IJSONServerRemote;
function JSONClientRemote(iIndex: integer): IJSONClientRemote;
procedure TCPSendString(iServer: string; iPort: word; iString: AnsiString);
procedure UDPSendString(iServer: string; iPort: word; iString: AnsiString);
procedure JSONSendString(iServer: string; iPort: word; iData: IPersistentStorage);
function WheatNetMixerRemote(iIndex: integer): IWheatNetMixerRemote;
function WheatNetBladeRemote(iIndex: integer): IWheatNetBladeRemote;
procedure MidiOutOpen(iDevice: integer);
procedure MidiOutClose(iDevice: integer);
procedure MidiOut(iDevice: integer; iStatus, iData1, iData2: byte);
procedure MidiOutSysEx(iDevice: integer; iData: AnsiString);
procedure MidiOutListDevices;

Description

Functions and Procedures

procedure CloneDatabase(iConnection: IDBAccess; iTargetType: TDBSQLServerType; iHost, iPort, iDatabase, iUser, iPassword, iExtraOptions: string; iIncludeIcons: boolean; iIncludePlaylist: boolean; iPlaylistLimit: TDateTime; iIncludeHistory: boolean; iHistoryLimit: TDateTime; iChangeDatabaseID: string; iProgressIndicator: IProgressIndicator);
 
function SecondsToTimeValue(iSeconds: double): TTimeValue;
 
function TimeValueToSeconds(iValue: TTimeValue): double;
 
function Exp(const X: Extended): Extended;
 
function Ln(const X: Extended): Extended;
 
function FileExists(const FileName: string): Boolean;
 
function ExtractFileName(const FileName: string): string;
 
function ExtractFileExt(const FileName: string): string;
 
function ChangeFileExt(const FileName, Extension: string): string;
 
function DeleteFile(const FileName: string): Boolean;
 
function GetTickCount64: int64;
 
function URLEncodeAnsi(const iString: string): string;
 
function URLEncodeUTF8(const iString: string): string;
 
function URLEncode(const iString: string): string;
 
function ISOWeek(DateTime: TDateTime): integer;
 
function FormatTimeValue(const iFormat: string; iTruncate: boolean; iValue: TTimeValue): string;
 
function DBToLinear(iValue: single): single;
 
function LinearToDB(iValue: single): single;
 
function ScaleToDB(iScale: single; iOverhead: single): single;
 
function DBToScale(iDB: single; iOverhead: single): single;
 
function FindFiles(const iPattern: string; iRecursive: boolean): IStrings;
 
function TimeValueToDateTime(iValue: TTimeValue): TDateTime;
 
function DateTimeToTimeValue(iDateTime: TDateTime): TTimeValue;
 
function DateTimeToISO8601(iValue: TDateTime; iEmptyIfZero: boolean; iWithMilliseconds: boolean): string;
 
function TryISO8601ToDateTime(const iValue: string; var oValue: TDateTime): boolean;
 
function ISO8601ToDateTime(const iValue: string; iDefault: TDateTime): TDateTime;
 
function GetAllocatedMemory: string;
 
function GetLargestFreeBlock: string;
 
function midiOutGetNumDevs: cardinal;
 
function AirenceRemote(iIndex: integer): IAirenceRemote;
 
function AirliteRemote(iIndex: integer): IAirliteRemote;
 
function AxiaRemote(iIndex: integer): IAxiaRemote;
 
function K8055Remote(iIndex: integer): IK8055Remote;
 
function IOWarriorRemote(iIndex: integer): IIOWarriorRemote;
 
function IOPort(iPort: word): IIOPort;
 
procedure UpdateAdvertising(iItems: IPlaylist);
 
procedure UpdateAdvertisingEx(iItems: IPlaylist; var oInspected, oChanged: integer; var oErrors: IStrings);
 
function DB(iIndex: integer): IDBConnection;
 
function DBAccess(iIndex: integer): IDBAccess;
 
function DHDRemote(iIndex: integer): IDHDRemote;
 
function RM2200DRemote(iIndex: integer): IRM2200DRemote;
 
function DMAXRemote(iIndex: integer): IDMAXRemote;
 
function EmberPlusConsumerRemote(iIndex: integer): IBaseEmberPlusConsumerRemote;
 
function Encoder: IBassStreamingEncoder;
 
function VXLWCPRemote(iIndex: integer): IVXLWCPRemote;
 
function MambaNetRemote(iIndex: integer): IMambaNetRemote;
 
function DefaultMixdownOptions: TMixdownOptions procedure MixdownPlaylist(iItems: IPlaylist; iOutputFilename: string; iFileFormat: TEncoderFileFormat; iBitrate: integer; iStereoMode: TEncoderStereoMode) procedure MixdownPlaylistEx(iItems: IPlaylist; iOutputFilename: string; iFileFormat: TEncoderFileFormat; iBitrate: integer; iStereoMode: TEncoderStereoMode; iSampleRate: integer; iEncoderOptions: string; iIncludedRegions: TSetOfByte) procedure MixdownPlaylistWithOptions(iItems: IPlaylist; iOutputFilename: string; iOptions: TMixdownOptions);
 
function GetNexusBackendSettings: INexusBackendSettingsList;
 
function CreateNexusBackend(const iSettings: INexusBackendSettings): INexusBackend;
 
function RESTRemote(iIndex: integer): IRESTRemote;
 
procedure RESTExecuteCommand(iURL, iCommand: string);
 
procedure _RESTError(iCode: integer; iErrorMessage, iContent: string);
 
function CreateRESTClientWithCredentials(iURL, iUser, iPassword: string): IRESTClient;
 
function CreateRESTClientWithToken(iURL, iToken: string): IRESTClient;
 
function SASRemote(iIndex: integer): ISASRemote;
 
procedure SystemLog(iMessage: string);
 
procedure RunScript(iFilename: string);
 
procedure ExecuteCommand(iCommand: string);
 
procedure ShellExecute(iProgram, iParameters: string);
 
procedure ShellExecuteHidden(iProgram, iParameters: string);
 
function Random(iRange: integer): integer;
 
procedure SetApplicationTitle(iValue: string);
 
function PlayoutEngine: IPlayoutEngine;
 
function PlaylistCount: integer;
 
function SelectPlaylist(iIndex: integer): boolean;
 
function Playlist(iIndex: integer): IPlaybackControl;
 
function CurrentPlaylist: IPlaylist;
 
function CurrentPlaylist: IPlaybackControl;
 
function PlaybackControl(iIndex: integer): IPlaybackControl;
 
function CurrentPlaybackControl: IPlaybackControl;
 
function Cartwall: ICartwallControl;
 
function DatabaseCount: integer;
 
function SelectDatabase(iIndex: integer): boolean;
 
function Database(iIndex: integer): IDatabase;
 
function CurrentDatabase: IDatabase;
 
function ComPort(iPort: string): IComPort;
 
function GetRemote(iType: TGUID; iIndex: integer): IRemote;
 
function Factory: IFactory;
 
function Config: IConfiguration;
 
function FakeNow: TDateTime;
 
function Instance: IInstanceData;
 
function AlbumArtService: IAlbumArtService;
 
procedure Sleep(milliseconds: Cardinal);
 
function IntToHex(Value: int64; Digits: integer): string;
 
function GetRuntimeData(iKey: string): string;
 
procedure SetRuntimeData(iKey: string; iValue: string);
 
function FileAge(const FileName: string; out FileDateTime: TDateTime): Boolean;
 
function MoveFile(const OldName, NewName: string): boolean;
 
function CopyFile(const iSource, iDestination: string; iOverwrite: boolean): boolean;
 
function FindAudioFiles(iPattern: string; iRecursive: boolean): IStrings;
 
procedure ShowMessage(const iMessage: string);
 
function Frac(Val: Extended): Extended;
 
function preg_match(iPattern, iString: string; out oMatches: IStrings): boolean;
 
function StringReplace(iText, iSearch, iReplace: string): string;
 
function FileSize(iFilename: string): int64;
 
procedure SendMail(iTo, iSubject, iBody: string);
 
function WrapText(const Line: string; MaxCol: Integer): string;
 
function MixerCount: integer;
 
function Mixer(iIndex: integer): IMixer;
 
function GetNextItems(iItem: IPlaylistItem; iIncludeItemTypes: TPlaylistItemTypes): IPlaylist;
 
procedure TraversePlaylist(iItems: IPlaylist; iRecursively: boolean; iCallback: TTraversePlaylistCallback);
 
function ResolveDBServerURL(iURL: string; iPurpose: TAudioPurpose; out oURL: string): boolean;
 
function HTTPGet(iURL: string): string;
 
function HTTPGetEx(iURL: string; iCustomHeaders: IStrings): string;
 
procedure HTTPGetAsync(iURL: string);
 
function HTTPGetFile(iURL, iTargetFilename: string): string;
 
function HTTPPost(iURL: string; iData: string): string;
 
procedure HTTPPostAsync(iURL: string; iData: string);
 
function HTTPPostRaw(iURL: string; iContentType: string; iData: RawByteString): string;
 
procedure HTTPPostRawAsync(iURL: string; iContentType: string; iData: RawByteString) function HTTPPutRaw(iURL: string; iContentType: string; iData: AnsiString; iCustomHeaders: IStrings): string;
 
procedure FTPGet(iHost: string; iPort: integer; iUser, iPassword, iFilename, iLocalFile: string) procedure EnableTimerEx(iID: string; iInterval: integer);
 
procedure EnableTimer(iInterval: integer);
 
procedure DisableTimerEx(iID: string);
 
procedure DisableTimer;
 
function StreamMonitor: IStreamMonitorModule;
 
function TCPClientRemote(iIndex: integer): ITCPClientRemote;
 
function TCPServerRemote(iIndex: integer): ITCPServerRemote;
 
function JSONServerRemote(iIndex: integer): IJSONServerRemote;
 
function JSONClientRemote(iIndex: integer): IJSONClientRemote;
 
procedure TCPSendString(iServer: string; iPort: word; iString: AnsiString);
 
procedure UDPSendString(iServer: string; iPort: word; iString: AnsiString);
 
procedure JSONSendString(iServer: string; iPort: word; iData: IPersistentStorage);
 
function WheatNetMixerRemote(iIndex: integer): IWheatNetMixerRemote;
 
function WheatNetBladeRemote(iIndex: integer): IWheatNetBladeRemote;
 
procedure MidiOutOpen(iDevice: integer);
 
procedure MidiOutClose(iDevice: integer);
 
procedure MidiOut(iDevice: integer; iStatus, iData1, iData2: byte);
 
procedure MidiOutSysEx(iDevice: integer; iData: AnsiString);
 
procedure MidiOutListDevices;
 

Generated by PasDoc 0.16.0.