Управление громкостю MediaPlayer

[VitalikA]

Подскажите как управлять громкостью Media Player. Весь интернет посмотрел и не нашел ничего что смог бы нормально использовать. Везде код с собственными процедурами и функциями я не знаю где это прописывать. можете дать ссылку на подробное описание или написать как это сделать.

[VitalikA]

Хотя уже сам нашел код

var volume: LongWord;
Begin
 volume := 6500* (TrackBar1.Max-TrackBar1.Position);
 volume := volume + (volume shl 16);
 waveOutSetVolume(WAVE_MAPPER,volume);
end;

Теперь подскажите как сделать чтобы плеер воспроизводил песню которую я перетащил с прямо из папки на форму.