Конференция "KOL" » Как у KOLMHUpDown определить какая стрелочка нажата
 
  • Vinum (29.11.07 12:48) [0]
    Здравствуйте, собсно мой код, представлен ниже и по идее должен работать, но почему-то он работает, но не корректно, т.е не сразу схватывает правильное направление стрелки, помогите 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;

  • mdw © (29.11.07 13:18) [1]
    Смотри OnChangingEx, там это есть. По крайней мере в Win32 работает. Для WinCE нужно что-то править. Скорее всего, нотификация там приходит родителю, а не самому контролу.
  • Vinum (29.11.07 14:36) [2]
    Спасибо, разобрался
 
Конференция "KOL" » Как у KOLMHUpDown определить какая стрелочка нажата
Есть новые Нет новых   [134431   +10][b:0][p:0.001]