Programmatically Inserting a Processor Filter (Delphi 6.0)

Assume you want to insert the Emboss as first filter to the play object.

1.	Start with the project that you created in Using ltmmPlayCtrl for Simple Playback.
2.	Add button control to your form, and name it as follows:
	Name	Caption
	btnSelectFilter	Select Filter
3.	Handle the btnSelectFilter OnClick event, and code btnSelectFilterClick procedure as follows.

procedure TForm1.btnSelectFilterClick(Sender: TObject);
var
nIndex: Integer;
begin
//The string below is retrieved from the Filters List utility
nIndex:= ltmmPlayCtrl1.VideoProcessors.Find('@device:sw:{E526D606-22E7-494C-B81E-AC0A94BFE603}\{E2B7DB17-38C5-11D5-91F6-00104BDB8FF9}');
ltmmPlayCtrl1.SelectedVideoProcessors.Add ( ltmmPlayCtrl1.VideoProcessors.Item (nIndex), 0 );
end;

4.	Run your program to test it.