Bug in type definition of record _mmtime in mmsystem.pp
Original Reporter info from Mantis: wyng
-
Reporter name: Wyng y
Original Reporter info from Mantis: wyng
- Reporter name: Wyng y
Description:
Wrong definition:
_mmtime = packed Record
wType: UINT;
Case integer Of
0: (ms: DWORD);
1: (sample: DWORD);
2: (cb: DWORD);
3: (ticks: DWORD);
4: (smpte: packed Record
hour, min, sec, frame, fps, dummy: byte;
pad: Array[0..1] Of byte
End);
5: (songptrpos: DWORD);
End;
It must be as follows:
_mmtime = packed Record
wType: UINT;
Case integer Of
TIME_MS: (ms: DWORD);
TIME_SAMPLES: (sample: DWORD);
TIME_BYTES: (cb: DWORD);
TIME_TICKS: (ticks: DWORD);
TIME_SMPTE: (smpte: packed Record
hour, min, sec, frame, fps, dummy: byte;
pad: Array[0..1] Of byte
End);
TIME_MIDI: (songptrpos: DWORD);
End;
Mantis conversion info:
- Mantis ID: 38389
- OS: Windows 10
- OS Build: 10
- Platform: Windows
- Version: 3.3.1