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

Вниз

Фокус ввода   Найти похожие ветки 

 
RSN ©   (2004-12-28 23:49) [0]

Суть проблемы вот в чем.
На форме несколько DBEdit. Как определить какой из них имеет фокус ввода? Смысл в том, чтобы не писать для каждого OnKeyPress


 
Dolt ©   (2004-12-29 00:06) [1]

Вообще-то ActiveControl.
Но Вам, скорее всего нужно использовать sender в обработчике OnKeyPress. Что-нибудь типа:

...
If sender is TDBEdit Then begin
 application.processMessage(Pchar("Редактируем поле "+DBEdit1.Field.FieldName),"",0);
 end;

...


 
Dolt ©   (2004-12-29 00:10) [2]

processMessage заменить на MessageBox - заработался, блин :(


 
Дмитрий В. Белькевич   (2004-12-30 03:53) [3]

Тэги? Хотя их здесь не любят, как и Goto. А ничего - и то, и то достаточно прозрачно и удобно. Если вмеру, кместу и с кометариями, что бы другие, кто проект пишет, не трогали, либо сообщали.



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

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

Наверх




Память: 0.44 MB
Время: 0.05 c
1-1103895082
XfroSt
2004-12-24 16:31
2005.01.16
как определить имя пользователя


1-1104023591
Narik
2004-12-26 04:13
2005.01.16
Inifiles


3-1103006883
OlegL
2004-12-14 09:48
2005.01.16
TMemoField


1-1104053154
гость
2004-12-26 12:25
2005.01.16
запись в файл


14-1104241784
syte_ser78
2004-12-28 16:49
2005.01.16
выход из цикла





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский