Разработка приложений в системе Delphi. Шейкер Т.Д. - 127 стр.

(флаги), которые определяют режим воспроизведения и тип источника звука.
Если заданный звуковой файл не найден, то PlaySound воспроизводит
системный звук по умолчанию. При использовании функции PlaySound в
разделе uses необходимо указать модуль mmSystem.
    Звук можно воспроизводить синхронно, асинхронно, непрерывно. При
синхронном воспроизведении звука работа приложения приостанавливается до
завершения звучания, однако система запоминает действия пользователя.
Асинхронное (параллельное) воспроизведение не блокирует работу приложения.
    Если задано непрерывное повторение звукового файла, то обязательно надо
предусмотреть управляющий элемент для завершения воспроизведения.
    Функция    MessageBeep     воспроизводит    звук   асинхронно,   а   при
использовании PlaySound можно управлять режимом воспроизведения.
    В приведённом ниже примере демонстрируется использование функций
воспроизведения звука. Переменная file_name содержит имя звукового
файла. Параметр hmod задан равным 0, так как звук берётся не из ресурса.
Значение параметра snd_async обеспечивает параллельное воспроизведение
звука функцией PlaySound.
case RadioGroup1.ItemIndex of
  0: Beep;
  1: MessageBeep(mb_iconhand);
  2: if file_name<>''
       then PlaySound(pChar(file_name), 0, snd_async)
       else ShowMessage('Файл не задан');
  end;

Анимация
   Для создания анимации на профессиональном уровне в настоящее время
имеются специальные пакеты. Однако средствами Delphi вполне можно
«оживить» простые изображения. Для этой цели используется программное
рисование и таймер, который задаёт темп смены кадров. Примеры создания
простой мультипликации можно найти в книгах [1], [3] и [10].




                                     127