Скачать: CL | DM;

Dlia nekotorie vk_xxx TCheckBox.OnKeyDown ne vuizivaetsia   Найти похожие ветки 

← →
Nikolab   (2002-08-28 11:38) [0]

U menia takoi problem: V tForm, na tPanel razpolojil neskolko tCheckBox. Hotel v TCheckBox. OnKeyDown sdelat:
if Key in [vk_Down,vk_Up] then begin
ActiveControl:=DBGridArch;
end;
Okozalos, sto pri najatie vk_Down,vk_Up obrabotchik OnKeyDown ne vuizivaetsia, a kto-to meniaet aktivnoi CheckBox. Etot ne forma, potomu-sto i kogda KeyPreview:=true opiat ne vuizivaetsia obrabotchik OnKeyDown.

---

← →
Ученик ©   (2002-08-28 11:51) [1]

procedure CMDialogKey(var Message : TCMDialogKey); message CM_DIALOGKEY;

procedure TForm1.CMDialogKey(var Message : TCMDialogKey);
begin
if Message.CharCode in [VK_UP, VK_DOWN] then

else
inherited
end;

---

← →
Nikolab   (2002-08-28 12:11) [2]

Bolshoe spasibo dlia otveta, bistrota i to, sto poniali moi russkii iazik.

---

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

Скачать: CL | DM;



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