also mit einer .wav geht das so...
Delphi-Quellcode:
unit Unit1;
interface
uses
MMSystem;
implementation
{$R MyResFile.res}
procedure TForm1.FormCreate(Sender: TObject);
begin
PlaySound(PChar(1), hInstance, SND_ASYNC
or SND_MEMORY
or SND_RESOURCE
or SND_LOOP);
end;
end.
und wie geht es mit einer midi oder mp3?
