Beim öffnen des Forms Datei abspielen

[Hansa]

Delphi-Quellcode:

procedure WaveAbspielen (DateiName : string);
var flag : byte;
begin
  flag:=SND_ASYNC;
  sndPlaySound(PChar (DateiName), Flag);
end;