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

Вниз

Вопрос по TLabel   Найти похожие ветки 

 
Sergei   (2003-03-14 09:21) [0]

Здравствуйте
Такой вопрос
Как сделать к примеру ассоциацию TLabel c определенным компонентом что бы при попадание фокус на Контрол сама метка меняла цвет (для быстрого визуалного определения активного контрола) а при потере фокуса изменяла на исходный цвет

Необходмио как-нибудь в общем виде (т.е без привязки к имени TLabel) что бы на каждый TLabel не прописывать один и тот же код ????


 
GAlexandr   (2003-03-14 09:35) [1]

Напиши компонент производный от TLabel и пользуй его хоть сто раз!


 
Юрий Зотов ©   (2003-03-14 09:37) [2]

1. Каждой метке через ее свойство FocusControl сопоставьте свой контрол. В Caption меток можно использовать амперсанды для прямой навигация по контролам с клавиатуры (Alt+буква).

2. В обработчике OnEnter (одном для всех) напишите:

for i := 0 to ComponentCount - 1 do
if (Components[i] is TLabel) and
(TLabel(Components[i]).FocusControl = Sender) then
begin
TLabel(Components[i]).Font.Color := clRed; // По вкусу
Break
end

3. В обработчике OnExit (одном для всех) напишите то же самое, только присвойте шрифту метки исходный цвет.


 
Юрий Зотов ©   (2003-03-14 09:42) [3]

> GAlexandr (14.03.03 09:35)
Можете предложить простой механизм обратной связи?


 
REA ©   (2003-03-14 09:46) [4]

А этот TLabeledEdit.EditLabel.Owner


 
BillyJeans ©   (2003-03-14 09:49) [5]

procedure FocusControl(Control: TWinControl);


 
Sergei   (2003-03-14 10:14) [6]

> to All
Спасибо всем особенно Юрию Зотову :))



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

Текущий архив: 2003.03.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
14-88136
Ketmar
2003-03-04 13:43
2003.03.27
система с замкнутым циклом для обеспечения жизнедеятельности...


3-87779
Nikolai_S
2003-03-11 14:30
2003.03.27
Конвертор базы данных Clarion в DBF (или Access)


3-87789
qwerty2
2003-03-07 13:10
2003.03.27
Оптимизировать работу BDE


7-88253
CRACKISH
2003-01-28 20:20
2003.03.27
Отключение в XP?????????????


14-88228
VID
2003-03-11 21:59
2003.03.27
EXCEL: создание особого файла...