diff --git a/packages/sndfile/examples/sfplay.pp b/packages/sndfile/examples/sfplay.pp
index 83ae3a2b85..d5147c89cd 100644
--- a/packages/sndfile/examples/sfplay.pp
+++ b/packages/sndfile/examples/sfplay.pp
@@ -45,7 +45,7 @@ var
   ScaleData: Boolean;
 begin
   Writeln(SPlaying,FileName);
-  SoundFile:=sf_open(pChar(FileName), SFM_READ, @Info);
+  SoundFile:=sf_open(PAnsiChar(FileName), SFM_READ, @Info);
   If (SoundFile=Nil) then
     begin
       sf_perror(Nil);
diff --git a/packages/sndfile/src/sndfile.pp b/packages/sndfile/src/sndfile.pp
index e98674c2da..8196ab3a10 100644
--- a/packages/sndfile/src/sndfile.pp
+++ b/packages/sndfile/src/sndfile.pp
@@ -410,7 +410,7 @@ type
 ** to sf_perror () or sf_error_str ().
 ** All calls to sf_open() should be matched with a call to sf_close().
 }
-function sf_open (path : pChar; mode : ctypes.cint; sfinfo : PSF_INFO) : PSNDFILE; cdecl;
+function sf_open (path : PAnsiChar; mode : ctypes.cint; sfinfo : PSF_INFO) : PSNDFILE; cdecl;
   external sndfilelib  name 'sf_open';
 
 {