Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.07.14;
Скачать: [xml.tar.bz2];

Вниз

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);


Удачи.



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

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

Наверх




Память: 0.45 MB
Время: 0.007 c
6-44780
Drain_x
2003-05-07 12:11
2003.07.14
Как в win2000 программно открыть доступ к каталогу ?


3-44577
corte ™
2003-06-20 12:54
2003.07.14
Всем привет никто ни незнает как вернуть из Хран.Проц. в MSSQL


8-44773
Фродо
2003-03-26 12:28
2003.07.14
DirectDraw & DirectSound


1-44740
Луарвик
2003-07-01 13:38
2003.07.14
.dll =>


3-44586
smolin
2003-06-20 14:26
2003.07.14
DBEdit формат ввода ???





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский