سلام
برای سیستم های سخنگو که تو بانک ها حتما دیدید مثلا میگوید صد و بیست و پنج . صداهای "صدو " و " بیست و " و "پنج" را پشت سر هم گفته میشه .
میتونید کمک کنید که چجوری به صورت آنلاین، چند صدا را پشت سر هم اضافه کنم و یک فایل صوتی را پخش کنم؟
نمایش نسخه قابل چاپ
سلام
برای سیستم های سخنگو که تو بانک ها حتما دیدید مثلا میگوید صد و بیست و پنج . صداهای "صدو " و " بیست و " و "پنج" را پشت سر هم گفته میشه .
میتونید کمک کنید که چجوری به صورت آنلاین، چند صدا را پشت سر هم اضافه کنم و یک فایل صوتی را پخش کنم؟
سلام
پیدا کردم
[برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]
کد:InStream, OutStream: TFileStream;
begin
OutStream := TFileStream.Create('result.mp3', fmCreate or
fmShareDenyWrite);
try
InStream := TFileStream.Create('part1.mp3', fmOpenRead or
fmShareDenyWrite);
try
OutStream.CopyFrom(InStream, 0);
finally
InStream.Free;
end;
InStream := TFileStream.Create('part2.mp3', fmOpenRead or
fmShareDenyWrite);
try
OutStream.CopyFrom(InStream, 0);
finally
InStream.Free;
end;
finally
OutStream.Free;
end;
end;