Hallo,
ich versuche gerade mittels Bass.dll eine Wavedatei langsam abzuspielen, denn normalerweise ist sie viel zu schnell.
Mein Ansatz:
Delphi-Quellcode:
var
FS: TFileStream;
MS: TMemoryStream;
CH: HCHANNEL;
begin
FS := TFileStream.Create('E:\vgmstream\dump.wav', fmOpenRead);
MS := TMemoryStream.Create;
try
MS.CopyFrom(FS, 0);
finally
FS.Free;
end;
CH := BASS_StreamCreateFile(True, MS.Memory, 0, MS.Size, 0);
if BASS_ChannelSetAttribute(CH, BASS_ATTRIB_TEMPO, 3.2) then
Showmessage('success')
else
Showmessage(IntToStr(Bass_ErrorGetCode));
Bass_ChannelPlay(Ch, True);
MS.Free;
BASS_ATTRIB_TEMPO ist in BASS_FX.pas deklariert; muss ich da vielleicht vorher noch irgendwas laden/setzen?
Es kommt immer Fehler 19 -> Illegaler Typ