MemoryStream.SetSize не слушается [D7, XP]
Страницы:
<
1
2
>
rammic © (2011-08-17 16:11:00)
Прошу помощи у мастеров. Не смог найти программу,которая меня
бы устроила, поэтому пришлось сочинять самому. На настоящего
программиста она, наверное,произведет впечатление велосипеда,
связанного веревками, но она работает и делает то, что мне нужно,
кроме одного.
Вопрос в следующем. Программа генерирует различные
звуки, но только 24 секунды при nChannels:= Stereo;
nSampleRate:= 44100; при nChannels:= Mono; соответственно - 44
секунды. Вывел в Edit intToStr(ms.Size) Если меньше 24 секунд все
показывает правильно если - больше показывает 46.Наверное это
размер WaveFormatEx. И, естественно, не играет.
Пробовал перед заполнением звуковыми данными писать
ms.SetSize(RiffCount)- не обращает внимания, показывает те же 46.
Можно ли увеличить MemoryStream.Size до нужного
размера,
Например, на 3 минуты?
Ega23 (2011-08-17 16:30:00) [21]
procedure TForm19.Button6Click(Sender: TObject);
begin
with TMemoryStream.Create do
try
Size := 1000;
ShowMessage(IntToStr(Size));
finally
Free;
end;
end;
Всё работает, ищите ошибку в другом месте.
Страницы:
<
1
2
>
Наверх 
ЧАТ |
Орешник |
|
