Subject:  Code for testing microphone input level?

Has anyone got the Audio extensions working for testing input level? I've
tried the following without success:

    lpStatus.dwItem := MCI_WAVE_STATUS_LEVEL;
    i := mciSendCommand(levelDID,MCI_STATUS,MCI_WAIT or
                        MCI_STATUS_ITEM,DWORD(@lpStatus));