playAlertSound
procedure playAlertSound;
Plays a sound associated with the current alert.
var cm : command;
begin
showAlert('Message', 'New message arrived', loadImage('/img1.png'), ALERT_INFO);
playAlertSound;
cm := createCommand('OK', CM_OK, 1);
addCommand(cm);
repeat
delay(100);
until getClickedCommand <> emptyCommand;
showForm; // this will clear alert from the screen
...
end.
See also: showAlert