search

smarthaert / phoenixlib

Automatically exported from code.google.com/p/phoenixlib
0 stars 0 forks source link

Bass - Please Restart to Music #143

Closed GoogleCodeExporter closed 9 years ago

GoogleCodeExporter commented 9 years ago 
procedure TPHXMusic.Restart;
begin
  if FLooping then
  begin
    BASS_ChannelSetAttribute( Handle, BASS_SAMPLE_LOOP, BASS_SAMPLE_LOOP);
  end else
  begin
    BASS_ChannelSetAttribute( Handle, 0, BASS_SAMPLE_LOOP);
  end;

  if not BASS_ChannelPlay(Handle, True) then
  begin
    raise Exception.CreateFmt('Bass error: %s', [GetBassError]);
  end;
end;

Original issue reported on code.google.com by wagenhei...@gmail.com on 4 Apr 2011 at 8:59

GoogleCodeExporter commented 9 years ago 
Added to V2

Original comment by andreas....@gmail.com on 11 Jul 2013 at 12:08