TrackBar установить шаг

@MAcK · Регистрация: 27.05.2008

Нужно сделать шаг 10. Чтобы значение было кратное 10, но сделать нужно при перетаскивании ползунка, а не при отпускании

@Turbosega · 04.08.2008, 13:55

var
TBpos: Integer;
....

TBpos:=TrackBar.Position*10;

{
в свойствах трекбара выстави минимальное 1 а максимальное сколько тебе надо

}

@MAcK · 04.08.2008, 13:56 **[ТС]**

Гениально

@Turbosega · 04.08.2008, 13:59

или даже вот так

TrackBar.Min :=0;
TrackBar.Max :=100; // это для примера
TrackBar.Increment:=10;

@MAcK · 04.08.2008, 14:37 **[ТС]**

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

... TrackBar.Increment:=10;

А вот этого нет, ну и первый вариант подошёл

Vovan-VE · 04.08.2008, 20:14

Можно новое значение вместо переменной в свойство Tag записывать, чтобы лишних переменных не плодить.

@MAcK Комбайнёр 1606 / 704 / 77 Регистрация: 27.05.2008 Сообщений: 2,535
		1
	TrackBar установить шаг 04.08.2008, 13:49. Показов 10390. Ответов 5 Метки нет (Все метки) Нужно сделать шаг 10. Чтобы значение было кратное 10, но сделать нужно при перетаскивании ползунка, а не при отпускании 0

@Turbosega 40 / 40 / 10 Регистрация: 27.06.2008 Сообщений: 118
	04.08.2008, 13:55	2
	var TBpos: Integer; .... TBpos:=TrackBar.Position*10; { в свойствах трекбара выстави минимальное 1 а максимальное сколько тебе надо } 1

@MAcK Комбайнёр 1606 / 704 / 77 Регистрация: 27.05.2008 Сообщений: 2,535
	04.08.2008, 13:56 [ТС]	3
	Гениально 0

@Turbosega 40 / 40 / 10 Регистрация: 27.06.2008 Сообщений: 118
	04.08.2008, 13:59	4
	или даже вот так TrackBar.Min :=0; TrackBar.Max :=100; // это для примера TrackBar.Increment:=10; 0

@MAcK Комбайнёр 1606 / 704 / 77 Регистрация: 27.05.2008 Сообщений: 2,535
	04.08.2008, 14:37 [ТС]	5
	Сообщение от Turbosega ... TrackBar.Increment:=10; А вот этого нет, ну и первый вариант подошёл 0

Vovan-VE 13208 / 6596 / 1041 Регистрация: 10.01.2008 Сообщений: 15,069
	04.08.2008, 20:14	6
	Можно новое значение вместо переменной в свойство Tag записывать, чтобы лишних переменных не плодить. 0