[rak]

Как обьединить два трак бара галочкой?И левий правий звук?

[Marvel]

если я правильно понял вопрос про 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;

а на счет "левий правий звук" - это смотря каким компонентом для звука пользуетесь.

[rak]

Для звука вибрал два ТракБара(Левий и Правий).Если галачку неставить то они двигаюца не вместе ,но когда поставить то вместе и что би звук невлиял на другие програми !

Япросто хочу зделать проигриватель типа винампа Еще робота предстоит .

Ивобще хочу делать невозможное ТЕОРЕТИЧЕСКИ!!!

[Marvel]

ну про то чтобы они двигались вместе по галочке, это я вам написал уже выше

[rak]

Ща буду разбираца ,спасиба

[rak]

Вишло ето несложно Спасиба

Ачтоби по нажатию они недвигались.

[Marvel]

ну ёптить, нажми на CheckBox1 и не будут двигаться. Там условие такое, если на CheckBox1 стоит галочка, то двигаются вместе, если не стоит - не двигаются куда уж проще )

[rak]

ЧТОБ ВОБЩЕ ИХ КЛИНИЛО

[Marvel]

Сообщение от rak

ЧТОБ ВОБЩЕ ИХ КЛИНИЛО

Клинит людей иногда, а с TrackBar'ами по другому. ты вначале по РУССКИ опиши что тебе надо, а потом будем думать

[Black Raider]

Сообщение от rak

Ачтоби по нажатию они недвигались.

По нажатию на что?

вообщем в обработку нажатия на что то впиши например так:

Код:

procedure TForm1.Button2Click(Sender: TObject);
begin
TrackBar1.Enabled:= not TrackBar1.Enabled;
end;

нажал 1 раз не двигаются нажал еще раз двигается.