diff --git a/packages/winunits-base/src/mmsystem.pp b/packages/winunits-base/src/mmsystem.pp
index 0071d464b0..223df32c9a 100644
--- a/packages/winunits-base/src/mmsystem.pp
+++ b/packages/winunits-base/src/mmsystem.pp
@@ -1143,7 +1143,9 @@ Type
  HMIDISTRM = THandle;
  LPHMIDI = ^HMIDI;
  LPHMIDIIN = ^HMIDIIN;
+ PHMIDIIN = LPHMIDIIN;
  LPHMIDIOUT = ^HMIDIOUT;
+ PHMIDIOUT =  LPHMIDIOUT;
  LPHMIDISTRM = ^HMIDISTRM;
  LPMIDICALLBACK = PDRVCALLBACK;
 
@@ -1233,6 +1235,7 @@ Type
   LPMIDIINCAPS  = LPMIDIINCAPSA;
  {$endif}
  TMIDIINCAPS  = MIDIINCAPS;
+ TMIDIOUTCAPS = MIDIOUTCAPS;
 
  PMIDIHDR = ^_midihdr;
  _midihdr = packed Record