Comments on: Write a media player in DirectShow and Delphi http://www.delphi-zone.com/2010/02/write-a-media-player-in-directshow/ One stop place for all your delphi needs Wed, 18 Jan 2012 17:12:54 +0000 hourly 1 http://wordpress.org/?v= By: Ionut Cristea http://www.delphi-zone.com/2010/02/write-a-media-player-in-directshow/comment-page-1/#comment-2087 Ionut Cristea Wed, 22 Dec 2010 14:36:27 +0000 http://www.delphi-zone.com/?p=186#comment-2087 controling volume can be something like this : procedure SetVolume(vol :Integer) var dsBasicAudio : IBASICAUDIO ; begin //vol parameter range should be -10000....0 dsGraphBuilder.QueryInterface(IID_IBASICAUDIO,dsBasicAudio ); dsBasicAudio .put_volume(-5000); dsBasicAudio :=nil; //release interface end; controling volume can be something like this :

procedure SetVolume(vol :Integer)
var
dsBasicAudio : IBASICAUDIO ;
begin
//vol parameter range should be -10000….0
dsGraphBuilder.QueryInterface(IID_IBASICAUDIO,dsBasicAudio );
dsBasicAudio .put_volume(-5000);
dsBasicAudio :=nil; //release interface
end;

]]> By: Sidney http://www.delphi-zone.com/2010/02/write-a-media-player-in-directshow/comment-page-1/#comment-2086 Sidney Wed, 22 Dec 2010 13:04:14 +0000 http://www.delphi-zone.com/?p=186#comment-2086 How to control the volume? With 2 components in form. How to control the volume? With 2 components in form.

]]>