Sounds

[turboPASCAL]

sndPlaySound(PChar, Flags)

Delphi-Quellcode:

uses mmsystem;

procedure Play(fSoundFilename: String);
begin
  sndPlaySound(PChar(fSoundFilename), SND_ASYNC);
end;

sndPlaySound verlangt einen PChar-Typ, die schreibweise @fSoundFilename[1] ist ein String der als Pointer angegeben ist.