3 SWaveFileHeader = record
4 hdrRiff: array [0 .. 3] of AnsiChar;
6 hdrWave: array [0 .. 3] of AnsiChar;
10 hdrFmtData: array [0 .. 3] of AnsiChar;
11 sizeOfFmtData: LongInt;
14 tWaveFormatPcm = record
17 sampleParSec: LongInt;
23 WrSWaveFileHeader = record
24 hdrRiff: array [0..3] of AnsiChar;
26 stWaveFormat: tWaveFormatPCM;
27 hdrWave: array [0..3] of AnsiChar;
28 hdrFmt: array [0..3] of AnsiChar;
30 hdrData: array [0..3] of AnsiChar;