Текущий архив: 2002.07.15;
Скачать: CL | DM;
Вниз
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;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.01 c
