3 / 3 / 0
Регистрация: 05.02.2011
Сообщений: 116
1

Однотипные действия для нескольких компонентов

23.12.2011, 19:47. Показов 2264. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте.

Вот у меня код выполняет одни и те-же действия для 10 Label:

Delphi
1
2
3
4
5
6
7
var
i:integer;
begin
for i:=0 to 9 do        
if Form1.Components[i] is TLabel then
(Form1.Components[i] as TLabel).Visible:=True;
end;
Как сделать, чтобы для всех Label при наведении мышки был цвет текста clRed?

Заранее благодарю, про плюсики не забываю.
0
23.12.2011, 19:47
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
23.12.2011, 19:47
Ответы с готовыми решениями:

Одинаковые действия для множества компонентов
Доброго времени суток! Существует форма, на ней компонент Image и сверху куча кнопок. Так вот необходимо выполнить определенные действия...

Обработчик событий для нескольких компонентов
В моей программе есть несколько компонентов TEdit, а так же StringGrid. Суть в том, чтобы разрешить вводить в Edit и в ячейки StringGrid...

Один слушатель для нескольких компонентов
На форме имеется несколько кнопок, которые создаются в цикле и заносятся в массив (List). Можно ли и как в одном обработчике обрабатывать...

3
2836 / 1645 / 254
Регистрация: 03.12.2007
Сообщений: 4,222
23.12.2011, 21:45 2
Delphi
1
2
3
4
5
6
7
8
9
procedure TForm1.Label1MouseEnter(Sender: TObject);
begin
  (Sender as TLabel).Font.Color := clRed;
end;
 
procedure TForm1.Label1MouseLeave(Sender: TObject);
begin
  (Sender as TLabel).Font.Color := clWindowText;
end;
И поставь эти функции в OnMouseEnter и OnMouseLeave всем 10 label'ам.
0
3 / 3 / 0
Регистрация: 05.02.2011
Сообщений: 116
23.12.2011, 22:12  [ТС] 3
А смысл тогда всего, если можно в каждом label (даже если их 1000) в OnMouseEnter и OnMouseLeave все отдельно прописать?
0
 Аватар для Arcor
5707 / 2298 / 466
Регистрация: 20.11.2009
Сообщений: 7,721
Записей в блоге: 1
24.12.2011, 04:14 4
проще будет намного если ты создаешь свои лейблы динамически, и присвоишь им 2 процедуры, на кликалку и ан отпускание и потом циклически проверять
0
24.12.2011, 04:14
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
24.12.2011, 04:14
Помогаю со студенческими работами здесь

Одна переменная для нескольких компонентов
можно ли выполнить binding с фильтрацией. например для семи листбоксов одно свойства, но с выбором какие предметы там должны отображаться?...

Как для нескольких компонентов выполнять одно событие
Вообще суть такая: На форме есть 5 кнопок. Я на одну кнопку реализовал код, чтобы когда наводишь курсор на Button он сам в течении 3 сек....

Таблица из нескольких компонентов
Я не могу сообразить каким образом можно реализовать так(см рисунок). Дальность транспортирования выбирается из ComboBox, объём ковша...

Обход нескольких компонентов
Нужно обратиться к нескольким компонентам с одинаковыми именами, отличающимися индексом в названии (например button_1, button_2,...

VueJS анимация нескольких компонентов
Доброго времени суток! Столкнулся со следующей проблемы: Во VueJS как я понял имеется несколько способов анимирования: ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Почему могут не шифроваться русские символы в Java
Wired 17.02.2025
При разработке на Java нередко возникают сложности с шифрованием русских символов. Эта проблема особенно актуальна для разработчиков, создающих программное обеспечение для русскоязычной аудитории. . . .
Отличия ОС для x86_64 и ARM
Wired 17.02.2025
На данный момент сосуществуют две основные архитектуры процессоров - x86_64 и ARM. Эти архитектуры имеют принципиально разные подходы к организации вычислений и обработке данных, что накладывает. . .
Многопоточность в Python: как использовать Thread
bytestream 17.02.2025
Поток выполнения (thread) - это наименьшая последовательность инструкций, которая может управляться планировщиком операционной системы. Представьте себе, что ваша программа - это книга, а потоки -. . .
Как воспроизвести Race Condition в Python
bytestream 17.02.2025
В многопоточном программировании существует множество подводных камней, и одним из самых коварных является состояние гонки (Race Condition). Этот термин описывает ситуацию, когда результат выполнения. . .
Ошибка "node: --openssl-legacy-provider is not allowed in NODE_OPTIONS"
bytestream 17.02.2025
Каждый разработчик рано или поздно сталкивается с ситуацией, когда при запуске проекта Node. js неожиданно выскакивает ошибка "node: --openssl-legacy-provider is not allowed in NODE_OPTIONS". Это. . .
Ошибка pip Python "AttributeError­: module 'lib' has no attribute 'OpenSSL_add_al­l_algorit­hms'"
bytestream 17.02.2025
При разработке на Python частенько сталкиваешься с разными сюрпризами, но ошибка AttributeError: module 'lib' has no attribute 'OpenSSL_add_all_algorithms' - это что-то особенное. Знаете, это как. . .
Сообщение Play Store "You must complete the advertising ID declaration before you can release an app that targets"
bytestream 17.02.2025
Рекламный идентификатор - это уникальный, но восстанавливаемый строковый идентификатор для каждого устройства Android. Думаю, вы удивитесь, но даже если ваше приложение не показывает рекламу. . .
Отличия App Router от Pages Router в Next.js
bytestream 17.02.2025
Next. js прошел длинный путь развития, и одним из самых значительных изменений стало появление App Router - революционного подхода к организации маршрутизации в приложении. Этот новый способ пришел на. . .
Топ10 лучших фреймворков JavaScript для изучения в 2025
bytestream 16.02.2025
В современной веб-разработке JavaScript занимает особое место, являясь одним из наиболее востребованных языков программирования. По мере развития веб-технологий появляется все больше фреймворков,. . .
Temporal в JavaScript - новый формат даты и времени
bytestream 16.02.2025
В мире JavaScript скоро произойдет значимое событие - появление нового встроенного объекта Temporal, который призван полностью заменить устаревший объект Date. Это революционное изменение в работе с. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru