TDVIADPCMHeader

type TDVIADPCMHeader = record

  RIFF: array [0..3] of char;

  FileSize: Integer;

  RIFFType: array [0..3] of char;

  FmtChunkId: array [0..3] of char;

  FmtChunkSize: Integer;

  FormatTag: Word;

  Channels: Word;

  SampleRate: Integer;

  BytesPerSecond: Integer;

  BlockAlign: Word;

  BitsPerSample: Word;

  cbSize: Word;

  SamplesPerBlock: Word;

  FactChunkId: array [0..3] of char;

  FactChunkSize: Integer;

  DataLength: Integer;

  DataChunkId: array [0..3] of char;

  DataSize: Integer;

end;