Проигрывание системных звуков

Благодарю за поддержку!

		Новости сайта
		Новости форума

Архив исходников

Automatic translation

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Проигрывание системных звуков

Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch

uses
   MMSystem;

 PlaySound(PChar('SYSTEMSTART'), 0, SND_ASYNC);


 { 
  Other System sounds: 
  Andere Systemsounds: 

  SYSTEMSTART 
  SYSTEMEXIT 
  SYSTEMHAND 
  SYSTEMASTERISK 
  SYSTEMQUESTION 
  SYSTEMEXCLAMATION 
  SYSTEMWELCOME 
  SYSTEMDEFAULT 
}