Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.02;
Скачать: CL | DM;

Вниз

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

 
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;
Скачать: CL | DM;

Наверх




Память: 0.44 MB
Время: 0.008 c
3-3729
Владимир
2003-09-12 20:51
2003.10.02
Первичный ключ


3-3763
you
2003-09-12 07:05
2003.10.02
как уменьшить размер базы данных???


3-3779
AlexVA
2003-09-11 15:33
2003.10.02
как создать новое поле


7-4149
Павел
2003-07-20 20:24
2003.10.02
Имя файла


1-3974
dataMaster
2003-09-19 10:53
2003.10.02
Как (или где) поймать изменение вводимых Items





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