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

Вниз

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

← →
Far   (2003-06-09 19:47) [0]

Подскажите самый красивый и простой способ перехода фокуса вперед и назад по нажатию на стрелки "вверх" и "вниз"

---

← →
clickmaker   (2003-06-09 19:48) [1]

SetFocus(GetWindow(Handle, GW_HWNDPREV));
SetFocus(GetWindow(Handle, GW_HWNDNEXT));

---

← →
Song   (2003-06-09 23:21) [2]

SelectNext()

---

← →
Far   (2003-06-10 22:51) [3]

to clickmaker ©
Чего-то ругается на такие конструкции
Пишет "Too many actual parameters"
Помогите неучу...

---

← →
Song   (2003-06-10 22:54) [4]

Windows.SetFocus..

---

← →
Far   (2003-06-10 23:02) [5]

А теперь никакой реакции на нажатие стрелок
при keyPreview:=true для формы

procedure TfrmMoney.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_UP then begin
Windows.SetFocus(GetWindow(Handle, GW_HWNDPREV));
end;
if Key = VK_DOWN then begin
Windows.SetFocus(GetWindow(Handle, GW_HWNDNEXT));
end;
end;

---

← →
Song   (2003-06-10 23:07) [6]

Сделай как я сказал в Song © (09.06.03 23:21) и не парься.

---

← →
Far   (2003-06-10 23:16) [7]

to Song ©
Так с помощью SelectNext() я могу выбрать только следующий объект? А как быть с предыдущим обеъктом?

---

← →
panov   (2003-06-10 23:25) [8]

procedure SelectNext(CurControl: TWinControl; GoForward, CheckTabStop: Boolean);

If GoForward is False, FindNextControl searches backward through the controls.

---

← →
Far   (2003-06-10 23:29) [9]

Спасибо! Все заработало. Постараюсь больше не тупить...

---

← →
Song   (2003-06-11 08:43) [10]

Он в любом случае будет следующим просто смотря откуда идёт обход :)

---

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

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

Наверх

Память: 0.46 MB
Время: 0.027 c