Volume Control In Delphi 1.

I know it's been covered before but could someone please tell me how to
create a volume control in Delphi 1?
--
david green