Sound Input

Anyone know how (or if possible) to access the microphone input from delphi.
I don't want to record a sound, just monitor the pitch / loudness of the
microphone input. Anyone get any ideas ?