procedure TForm8.TrackBar4Change(Sender: TObject);
begin try
Form2.DSVideoWindowEx1.ColorControl.Hue := TrackBar4.Position;
except end;End;