Форум: "Основная";
Текущий архив: 2002.07.15;
Скачать: [xml.tar.bz2];

Вниз

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

← →
Алексей Петухов   (2002-06-28 13:09) [0]

Всем добрый день.
Может кто-нибудь подскажет как заставить TrackBar1Change выполниться только один раз(после освобождения кнопки мыши).
Заранее спасибо.

---

← →
MBo   (2002-06-28 13:24) [1]

Если он больше не нужен, сделай
TrackBar1.OnChange:=nil;

---

← →
Алексей Петухов   (2002-06-28 15:09) [2]

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

---

← →
MBo   (2002-06-28 16:07) [3]

добрые люди подсказали про getkeystate ;)

procedure TForm1.TrackBar1Change(Sender: TObject);
var i:shortint;
begin
i:=getkeystate(vk_lbutton);
if i>-127 then //твои действия
label1.caption:=inttostr(TrackBar1.Position);
end;

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.07.15;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.012 c