procedure TForm8.GetValues;
Begin
TrackBar3.Position := Form2.DSVideoWindowEx1.ColorControl.Saturation;
TrackBar4.Position := Form2.DSVideoWindowEx1.ColorControl.Hue;
TrackBar2.Position := Form2.DSVideoWindowEx1.ColorControl.Contrast;
TrackBar1.Position := Form2.DSVideoWindowEx1.ColorControl.Brightness;
End;