[angvelem]

Не знаю, но при включении TimeSetEvent в класс TSound:

procedure OnTimer(uTimerID, uMsg, dwUser, dw1, dw2 : Integer); stdcall;
begin
  ...
  TSound(dwUser).LoadFromFile(Name);
  ...
end;

constructor TSound.Create;
begin
  fTimer := TimeSetEvent(500, 1, @OnTimer, DWORD(Self), TIME_PERIODIC);
end;

файл грузится. Хотя, судя по отладчику, разницы при вызовах я не увидел.