Problemas con MCI
Buenas Foro, Estoy intentando crear un VU-METER y sigo las indicaciones de Microsoft y dentro de la llamada del timer que controla la posicion del archivo de audio tengo:
mcip.dwItem := MCI_WAVE_STATUS_LEVEL;
mciSendCommand(MediaPlayer1.DeviceID, MCI_STATUS, MCI_STATUS_ITEM, DWORD(@mcip));
VrLevelBarLeft.Position := HiWord(mcip.dwReturn);
VrLevelBarRight.Position := LoWord(mcip.dwReturn);
Y no consigo que funcione. Alguien sabe como funciona esto.
Gracias por adelantado, feliz Navidad, un saludo
Pedro E. Pasamar Vidal
|