| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как у KOLMHUpDown определить какая стрелочка нажата

Vinum ©   (2007-11-29 12:48:00) 

Здравствуйте, собсно мой код, представлен ниже и по идее должен работать, но почему-то он работает, но не корректно, т.е не сразу схватывает правильное направление стрелки, помогите pls
mhupdown1.Position=1, max=2 min=0


procedure TForm1.MHUpDown1MouseDown(Sender: PControl;
 var Mouse: TMouseEventData);
var i,n,key:integer;
begin n:=1;
i:=form1.mhupdown1.Position;
if i>=n then key:=vk_right else key:=vk_left;
form1.mhupdown1.Position:=1;
form1.Button1.OnKeyDown(button1,key,0);
end;


---

Vinum   (2007-11-29 14:36:00) [1]

Спасибо, разобрался

---

mdw   (2007-11-29 13:18:00) [2]

Смотри OnChangingEx, там это есть. По крайней мере в Win32 работает. Для WinCE нужно что-то править. Скорее всего, нотификация там приходит родителю, а не самому контролу.

---

Наверх