2 years ago · a846897f68
--- a/packages/fcl-sound/src/fpwavformat.pas
+++ b/packages/fcl-sound/src/fpwavformat.pas
@@ -296,7 +296,7 @@ const
 
				   WAVE_FORMAT_EXTENSIBLE                 = $FFFE; { Microsoft }
			
 
				 
			
 
				 type
			
 
				-  TChunkID = array [0..3] of char;
			
 
				+  TChunkID = array [0..3] of AnsiChar;
			
 
				   TChunkHeader = packed record
			
 
				     ID: TChunkID;
			
 
				     Size: UInt32;