|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
22.11.2009, 13:51 | #1 |
Форумчанин
Регистрация: 09.11.2009
Сообщений: 669
|
Всем привет!
У меня есть 20 лэйблов на форме, нужно чтоб при наведении курсора на любой из них менялся его цвет, а при отведении снова менялся на стандартный. Прописывать для каждого лэйбла Nouse Mov и Mouse Leave по отдельности слишком муторно, поэтому я все лэйблы засунул в массив, а что делать дальше не знаю. Подскажите пожалуста как быть. В тамйер записал: for i:=1 to 20 do if LabelA[i].OnMouseLeave then Labela[i].Font.Color:=clGreen; Нада ещё указать параметр, потому что так не катит, а вот какой параметр?
Я не всегда знаю, о чем говорю, но знаю, что прав. © Мухаммед Али.
К чёрту обстоятельства. Я создаю возможности. © Брюс Ли Последний раз редактировалось Stilet; 23.11.2009 в 10:17. |
22.11.2009, 14:01 | #2 |
Старожил
Регистрация: 29.09.2009
Сообщений: 9,713
|
не нужно в массив и таймер, объедините их под общими событиями, например так:
Код:
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation |
22.11.2009, 14:10 | #3 |
Форумчанин
Регистрация: 09.11.2009
Сообщений: 669
|
raxp, не получается так как вы говорите, только тот лэйбл и реагирует, например в Label2 как в вашем коде, а остальные нет.
И ещё, если даже это заработает, то как быть если на форме кроме 20 лэйблов, которые должны менять цвет есть и те которые не должны меняться?
Я не всегда знаю, о чем говорю, но знаю, что прав. © Мухаммед Али.
К чёрту обстоятельства. Я создаю возможности. © Брюс Ли |
22.11.2009, 14:22 | #4 |
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
Дак вы же в массив заносите, каждому лейблу в цикле присваивайте данное событие
Код:
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
|
22.11.2009, 14:25 | #5 | ||
Старожил
Регистрация: 20.04.2008
Сообщений: 5,527
|
Цитата:
Цитата:
Код:
программа — запись алгоритма на языке понятном транслятору
|
||
22.11.2009, 14:27 | #6 | ||
Старожил
Регистрация: 29.09.2009
Сообщений: 9,713
|
Цитата:
Цитата:
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation |
||
22.11.2009, 14:28 | #7 |
Форумчанин
Регистрация: 09.11.2009
Сообщений: 669
|
Neeter, я что-то не допонял, это разве не при нажатии?
label.onClick := Label2MouseMove; А мне нужно при наведении курсора на Label
Я не всегда знаю, о чем говорю, но знаю, что прав. © Мухаммед Али.
К чёрту обстоятельства. Я создаю возможности. © Брюс Ли |
22.11.2009, 14:29 | #8 | |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
Цитата:
Эти обработчики (для Label2) назначьте всем лэйблам, которые должны менять цвет. Делается это в инспекторе объектов - выберите для нужных лэйблов Label2MouseLeave и Label2MouseEnter (я предлагаю это событие использовать вместо Label2MouseMove). |
|
22.11.2009, 14:30 | #9 | |
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
Цитата:
Код:
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
|
|
22.11.2009, 14:34 | #10 |
Форумчанин
Регистрация: 09.11.2009
Сообщений: 669
|
raxp, спасибо большое, теперь понял, да и вообще всем спасибо за столь активноую мне помощь
Я не всегда знаю, о чем говорю, но знаю, что прав. © Мухаммед Али.
К чёрту обстоятельства. Я создаю возможности. © Брюс Ли |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
не работает m_pSet->Move(i); | primeplus | Общие вопросы C/C++ | 0 | 28.09.2009 19:14 |
Процедура MOVE | iiunbreakableii | Общие вопросы Delphi | 1 | 15.09.2009 16:35 |
Блокировка Form move/resize | Alex_C | Общие вопросы Delphi | 2 | 04.03.2009 16:20 |
Mouse Roll | ax4start | Софт | 0 | 31.10.2008 09:50 |
Mouse самовольничает! | Altera | Компьютерное железо | 13 | 06.04.2008 19:26 |