PrevFocus

← →
Far (2003-07-01 22:36) [0]

Уважаемые! Подскажите, как определить компонент, который имел фокус перед текущим. Плодить переменные для запоминания в ней такого контрола не хочется. Может быть в системе уже есть эти данные?

← →
[NIKEL] (2003-07-01 23:57) [1]

читай SelectNext

← →
Far (2003-07-02 00:05) [2]

to [NIKEL] ©
Но мне не перейти на предыдущий компонент нужно, а только знать какой именно был предыдущим...

← →
[NIKEL] (2003-07-02 00:11) [3]

ну а перейти назад и получить активный контрол и снова вперед никак?

← →
Far (2003-07-02 00:15) [4]

to [NIKEL] ©
Да не хочется мельканий на экране...

← →
[NIKEL] (2003-07-02 00:27) [5]

...
ну а что тебе даст знание который компанент имел фокус перед текущим?

ну объяви переменную типа TWinControl и напиши один обработчик событий OnExit для всех компанентов, который будет присваивать данной переменной значение

← →
Almaz (2003-07-02 01:49) [6]

> Far (01.07.03 22:36)
> Уважаемые! Подскажите, как определить компонент, который
> имел фокус перед текущим. Плодить переменные для запоминания
> в ней такого контрола не хочется. Может быть в системе уже
> есть эти данные?

Для этого можно воспользоваться функцией FindNextControl Например так:

PrevControl := FindNextControl(ActiveControl, FALSE, TRUE, FALSE);

Удачи.

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