TrackBar

← →
F@T@L_Err0r (2007-09-24 11:41) [0]

Как изменять TRackbar1.position без выполнения события OnCange?

← →
Сергей М. © (2007-09-24 11:45) [1]

Просто не назначай обработчик этого события.

← →
Anatoly Podgoretsky © (2007-09-24 11:48) [2]

Для изменения событие не требуется, можно изменять в любой момент времени.

← →
F@T@L_Err0r (2007-09-24 11:50) [3]

дак мне надо по любому обрабатывать ето событие!!!
procedure TForm1.TrackBar1Change(Sender: TObject);
begin
MediaPlayer1.Position := TrackBar1.Position;
end;
Он у меня используется в качестве перемотки.

← →
Плохиш © (2007-09-24 11:52) [4]

> F@T@L_Err0r (24.09.07 11:41)
> Как изменять TRackbar1.position без выполнения события OnCange?

> F@T@L_Err0r (24.09.07 11:50) [3]
> дак мне надо по любому обрабатывать ето событие!!!

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

← →
Сергей М. © (2007-09-24 11:52) [5]

> мне надо по любому обрабатывать ето событие

Ну а как тогда понимать "без выполнения события OnChange" ?

← →
F@T@L_Err0r (2007-09-24 11:57) [6]

ну вот у меня в проге событие OnCange реализует перемотку трека...А надо чтобы TrackBar.Position следовал за Mediplayer.position и когда я в таймере присваиваю одно к другому генерится событие OnChange...и трек начинает скакать.

TrackBar1.OnChange := nil;
try
TrackBar1.Position :=
finally
TrackBar1.OnChange := TrackBar1Change;
end;

← →
F@T@L_Err0r (2007-09-24 12:02) [8]

спасибо!!!

Ну вот, теперь уже и таймер каким-то боком выплыл)

TrackBar Найти похожие ветки