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

Вниз

как передать фокус компонентам по порядку их следования   Найти похожие ветки 

 
stud   (2003-09-20 12:43) [0]

т.е. есть много едитов, нужно передавать фокус ввода от одного к следующему при выполнении некоторого условия, он хочется иметь обработчик для всех


 
Palladin   (2003-09-20 13:01) [1]

Создай класс-менеджер (хотя бы наследованием или агрегацией TList или TObjectList) фокусировки и добавляй туда созданные Edit по которым хочешь что бы бежала фокусировка
порядок следования можешь брать из TabOrder или можешь организовать свой...
Типа подобного
TFocusManager=class
protected
m_Controls:TObjectList;
public
constructor create;
destructor destroy; override;
procedure Add(p_Edit:TEdit);
procedure SetNextFocus;
end;


и вперед...


 
stud   (2003-09-20 13:07) [2]

замечательно в этой конструкции интересует примерное содежнание метода SetnextFocus))


 
Palladin   (2003-09-20 13:10) [3]

TEdit(m_Controls[m_nNextControl]).SetFocus;


 
stud   (2003-09-20 13:13) [4]

спасибо, все оказалось намного проще))
newvrachf.SelectNext((sender as TdxEdit),true,true);



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

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

Наверх




Память: 0.44 MB
Время: 0.009 c
3-3791
I m A
2003-09-05 14:42
2003.10.02
работа с бд....


1-3836
APTEMKA
2003-09-19 02:16
2003.10.02
Как повесить на нить медиаплеер


1-3919
tsarev
2003-09-22 08:11
2003.10.02
DateUtils


14-4051
Soft
2003-09-13 17:20
2003.10.02
Задача для Мастеров реляционных баз данных.


7-4139
pod
2003-07-18 07:46
2003.10.02
Клавиатура





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