请问如何首尾相连合并两个MP3文件?我用一位大侠的如下代码试验,但是后一首歌无法播放。
var
s:tfilestream;
s1:tfilestream;
s2:tfilestream;
begin
s:=tfilestream.create( 'd:\output.mp3 ',fmcreate);
s1:=tfilestream.create( 'd:\1.mp3 ',fmopenread);
s1.seek(0,sofrombeginning);
s.copyfrom(s1,s1.size);
s2:=tfilestream.create( 'd:\2.mp3 ',fmopenread);
s2.seek(0,sofrombeginning);
s.copyfrom(s2,s2.size);
s.free;
s1.free;
s2.free;
end;