если я правильно понял вопрос про TrackBar, то вот так (событие
OnChange обоих TrackBar'ов):
Код:
procedure TForm1.TrackBar1Change(Sender: TObject);
begin
if CheckBox1.Checked then TrackBar2.Position := TrackBar1.Position;
end;
procedure TForm1.TrackBar2Change(Sender: TObject);
begin
if CheckBox1.Checked then TrackBar1.Position := TrackBar2.Position;
end;
а на счет "левий правий звук" - это смотря каким компонентом для звука пользуетесь.