1 / 1 / 2
Регистрация: 18.05.2015
Сообщений: 79

Присвоение нескольким компонентам формы одного и того же значения

26.12.2015, 20:59. Показов 1669. Ответов 20
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Нужно упростить код. Как это можно сделать?
Вот сам код.
C++
1
2
3
4
5
6
7
8
9
10
11
12
    Form4->Label1->Visible=False;
    Form4->Label1->Enabled=False;
    Form4->Label2->Visible=False;
    Form4->Label2->Enabled=False;
    Form4->Label3->Visible=False;
    Form4->Label3->Enabled=False;
    Form4->Label4->Visible=False;
    Form4->Label4->Enabled=False;
    Form4->Label5->Visible=False;
    Form4->Label5->Enabled=False;
    Form4->Label6->Visible=False;
    Form4->Label6->Enabled=False;
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
26.12.2015, 20:59
Ответы с готовыми решениями:

Присвоение одного значения нескольким переменным сразу
Всем привет! Подскажите, пожалуйста. Такая проблема: есть несколько переменных, и одно значение, актуальное для них всех. Можно ли одной...

Присвоить одно значение нескольким компонентам формы выборочно
Например у меня на форме есть несколько Label, есть некое значение - пусть будет А = "БлаБла", как присвоить значение А...

Присвоение одного значения ряду переменных
ошибку выдает, а так-то очень удобно было-бы, там их штук 5 сразу обнулять надо, хочется в одной строке. i,c,c1:=0;

20
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33459 / 21559 / 8248
Регистрация: 22.10.2011
Сообщений: 37,016
Записей в блоге: 12
31.12.2015, 12:41
Лучший ответ Сообщение было отмечено DImawsasdas как решение

Решение

Студворк — интернет-сервис помощи студентам
C++
1
2
3
4
5
6
7
8
for( int i = ControlCount; i--; )
    {
        if( TLabel* label  = dynamic_cast< TLabel*>(Controls[i]))
        {
            label->Enabled = (label->Tag != 1);
            label->Visible = label->Enabled;
        }
    }
Все лейблы, у которых свойство Tag выставлено в 1 скроются, остальные останутся видимыми
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
31.12.2015, 12:41

Присвоение значения одного поля другому с условием
стоит задача присвоить поле rating из таблицы Rating в одноименное поле rating таблицы Content при условии что url страницы в обоих...

Присвоение одного значения выделенным строкам в гриде.
Не ужели в гриде не возможно выделив несколько строк одним событием присвоить им одно значение имеется Grid VALUE1 - CODE1 - ...

Присвоение одного значения множеству ячеек в VBA
Здравствуйте! Подскажите пожалуйста как можно прописать следующие действия покороче Me.Д1_1 = 0: Me.Д1_2 = 0: Me.Д1_3 = 0: Me.Д1_4с =...

Поиск по нескольким полям одного значения
Работаю с БД MS Access. В билдере использую ADOTable. Вопрос заключается в следующем: у меня есть четыре поля с телефонами сотрудников, как...

Присвоение ячейке значения, в зависимости от того, в какой области будет находиться рисунок
Добрый день. В VBA стал разбираться недавно, пожалуйста помогите. При помощи данного кода: Sub ВыводКоординатАвтофигур() Dim...


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

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

Новые блоги и статьи
Нейтральные знания ..., ... чистая наука. Пока что-то проходит модерацию на Хабре, стоит развить мысль ...
Hrethgir 20.07.2026
К таким радикальным взглядам я конечно в той публикации не приходил, но чтобы скоротать вечер, решил углубиться немного. 1. Почему показания термометра заряжены целью? Цель заложена в самом. . .
Установка нескольких штампов электронной подписи в строго определенных местах файла docx
ВладимирСамохин 19.07.2026
(В!) Работа с Электронной подписью - это неотъемлемая часть современного документооборота. Но что делать, если нужно поставить несколько штампов электронной подписи в строго определенных местах. . .
сукцессия 35. Научная статья о проделанной работе
anaschu 19.07.2026
Написал в формате латекс и пдф
Вангую, что это не пройдёт модерацию, и на неделе я запущу свой сервер.
Hrethgir 19.07.2026
Эта публикация сейчас в песочнице и ждёт приглашения. https:/ / habr. com/ ru/ sandbox/ 295048/ По ссылке 403. Не очень информативно такую ссылку постить. Запись от Usaga размещена Сегодня в 06:46 . . .
сукцессия 33. открытые вопросы от клауде
anaschu 19.07.2026
"Что накопилось за эту часть А — тринадцать правок, из которых шесть пришли из ваших вопросов и каждая оказалась реальной ошибкой, а не калибровкой: односторонний симбиоз, отсутствующий листопад,. . .
32 сукцессия
anaschu 19.07.2026
сукцессия 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не «подкручивает» сходимость —. . .
сукцессия 31: модель микоризы - это модель ещё нескольких явлений, социальных и экономических
anaschu 18.07.2026
Теория «Всего»: апдейт v1. 1. 2 — 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не. . .
сукцессия 30. Массив проверяющих друг друга моделей
anaschu 18.07.2026
Архитектура сети взаимопроверяющих моделей микоризной сукцессии (v2. 0) Развитие тензорного ОДУ-ядра и создание кросс-платформенного калибровочного полигона Уважаемые коллеги! В продолжение. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru