Цитата:
Сообщение от Dmitry_DM
В этом:
Код:
fs := TFileStream.Create(FileName, fmCreate);
try
fs.WriteBuffer(Header, SizeOf(Header));
for I := 1 to NumSamples do
begin
for J := 1 to Header.NumChannels do
begin
fs.WriteBuffer(WavInfo.Samples[J - 1, I - 1], BytsPerSample);
end;
end;
|
Нет. В этом месте читается массив из переменной WavInfo и записывается в файл. А в каком месте программы в этот массив были занесены данные, чтобы их здесь можно было записать в файл?
Цитата:
Сообщение от Dmitry_DM
И что из этого следует? WavInfo - переменная глобальная, ее видят все процедуры. Что не так?
|
Глобальная, но она пустая, так как в неё никто не заносит данные, а раз она пустая, то и Button4Click не может её содержимое сохранить в файл.