[poli-smen]

Сообщение от Dmitry_DM

Пока что у меня проблемы с записью данных в memo1. Можете посмотреть на код и сказать что сделать, что бы данные шли в своем порядке. А то ни как не могу сделать красиво и ровно. должно быть так:

Код:

RIFF
chunkSize 2194
WAVE
fmt 
subchunk1Size 16
audioFormat 1
numChannels 1
sampleRate 22050
byteRate 44100
blockAlign 2
bitsPerSample 16
data
subchunk2Size 2158

А оно все так:

Код:

RIFF
WAVE
fmt 
16
data
2158
audioFormat 0001
numChannels 1
sampleRate 22050
byteRate 44100
blockAlign 2
bitsPerSample 16

В приведённом коде я вообще не вижу где идёт вывод в Memo1 кроме этих двух строчек:

Код:

    Form1.memo1.Lines.Add(RiffChunk.RiffSign);
    Form1.memo1.Lines.Add(RiffChunk.WaveSign);

И кроме того этим двум строчкам не место в процедуре ReadWavInfo, так как эта процедура абстрагирована от элементов управления. Выводить нужно в методе формы, например в ButtonClick. И Form1 в нём указывать не нужно.

Сообщение от Dmitry_DM

Так же отмечу, что не могу найти 2 значение chunkSize. Не вывести, не мне даже понять, в каком месте оно читается.

А зачем его выводить? В информационных целях чтоли?

Размер чанка 'RIFF' читается здесь:

Код:

    fs.ReadBuffer(RiffChunk, SizeOf(RiffChunk));

А размер внутренних чанков ('fmt ', 'data' и остальных если есть) читаются здесь:

Код:

fs.ReadBuffer(Chunk, SizeOf(Chunk));