Răsfoiți Sursa

+ Added some compatibility types

michael 22 ani în urmă
părinte
comite
58adff1d7f
1 a modificat fișierele cu 9 adăugiri și 0 ștergeri
  1. 9 0
      packages/extra/mmsystem/mmsystem.pp

+ 9 - 0
packages/extra/mmsystem/mmsystem.pp

@@ -2143,6 +2143,15 @@ MCI_OVLY_LOAD_PARMS = MCI_OVLY_LOAD_PARMSA;
 PMCI_OVLY_LOAD_PARMS = PMCI_OVLY_LOAD_PARMSA;
 LPMCI_OVLY_LOAD_PARMS = LPMCI_OVLY_LOAD_PARMSA;
 {$endif}
+
+Type // Delphi compatibility
+  TMMIOInfo = _MMIOINFO;
+  TMMCKInfo = _MMCKINFO;
+  pcmwaveformat_tag = PCMWAVEFORMAT;
+  TPCMWaveFormat = pcmwaveformat_tag;
+        
+        
+
 (*////////////////////////////////////////////////////////*)
 (* Function prototypes*)
 (*////////////////////////////////////////////////////////*)